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SEO 0007 



;MEMORY PARITY TEST 

;MAINDEC-11-DCMFA-D 

;COPYRIGHT 1973, 1977, DIGITAL EQUIPMENT CORP., 

;AUTHOR: JIM KAPADIA 



MAYNARD, MASS. 



326 




327 




328 




329 




330 




331 




332 




333 




334 




335 




336 




337 




338 




339 




340 




341 




342 




343 




344 




345 




346 


000001 


347 


000002 


348 


000004 


349 


000010 


350 


000020 


351 


000040 


352 


000100 


353 


000200 


354 


000400 


355 


001000 


356 


002000 


357 


004000 


358 


010000 


359 


020000 


360 


040000 


361 


100000 


362 


000001 


363 


000004 


364 


077400 


365 


100000 


366 


177570 


367 


177570 


368 


177776 


369 


000007 


370 


000006 


371 


000240 


372 


oooooo 


373 


000510 


374 


OOOOOO 


375 


000001 


376 


000002 



SWITCH REGISTER SWITCH OPTIOJS (SWITCH SET TO A 1) 

SR15 - HALT ON ERROR 

SR14 - SCOPE 

INHIBIT PRINTOUT 

INHIBIT ITERATIONS 

HALT AFTER LOCATING BAD PARITY BEFORE CORRECTING IT 

HALT AFTER TYPING PARITY MEMORY MAP (ALLOWS MANUAL 

CHANGES TO BE MADE TO THE MAP TO FORCE TESTING OF 

MEMORY THAT WAS NOT LOCATED) 

HALT AT END OF PASS (IF HALTED ELSEWHERE, THE PROGRAM 

MAY BE RELOCATED TO BANK1 , WRITE WRONG PARITY MAY BE SET, 

AND/OR BAD PARITY MAY EXIST IN THE PARITY MEMORY). 



SR13 
SR1 1 
SR10 
SR09 



SR08 



;SYMBOL DEFINITIONS 

BIT0=1 

BIT1=2 

BIT2=4 

BIT3=10 

BIT4=20 

BIT5=40 

BIT6=100 

BIT7=200 

BIT8=400 

BIT9=1000 

BIT10=2000 

BIT1 1=4000 

BIT12=10000 

BIT13=2C000 

BIT14=40000 

BIT15=100000 

AE=1 

WWP = 4 

ADRS=77400 

PERR=100000 

DSWR=177570 

DDISP=1775/0 

PS=177776 

PC = %7 

SP = %6 

NOP=240 

OPEN=0 

STKPT=TSTX 

R0 = %0 

R1=%1 

R2 = %2 



;BIT DEFINITIONS 



;ACTION ENABLE 
;WRITE WRONG PARITY 
;ADDRESS OF ERROR 
;PARITY ERROR BIT 
5HARDWARE SWITCH REGISTER 
;HARDWARE DISPLAY REGISTER 
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lliill 



377 




000003 


378 




000004 


379 




000005 


380 




000006 


381 




000114 


382 




177572 


383 






384 






385 






386 






387 






388 






389 






390 






391 






392 






393 






394 






395 






396 




000030 


397 


000030 


016032 


398 


000032 


000340 


399 




000046 


400 


000046 


01 1702 


401 




000052 


402 


000052 


040000 


403 






404 






405 




000174 


406 


000174 


OOOOOO 


407 


000176 


OOOOOO 


408 


000200 


000167 001232 


409 




000210 


410 


000210 


000167 014204 


411 




000220 


412 


000220 


000167 001132 


413 




000230 


414 


000230 


000167 001042 


415 






416 




000510 


417 






418 






419 






420 






421 






422 


000510 


OOOOOO 


423 


000512 


OOOOOO 


424 


000514 


OOOOOO 


425 


000516 


OOOOOO 


426 


000520 


OOOOOO 


427 


000522 


OOOOOO 


428 


000524 


OOOOOO 


429 


000526 


OOOOOO 


430 


000530 


OOOOOO 


431 


000532 


OOOOOO 


432 
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R3 = %3 
R4=%4 
R5=%5 
R6=%6 



PARVEC=114 
SR0=177572 



;MACRO DEFINITIONS 



; PARITY ERROR TRAP VECTOR 
;ADDRESS OF MEM MGMT REGISTER SRO 



;TRAPCATCHER (.+2, HALT) LOADED INTO LOCATIONS 000-576 

;LOAD EMT VECTOR 
.=30 
EMTINT 
340 
.=46 
SENDAD 
.=52 
BIT14 



;LOAD STARTING ADDRESS AREA 
. = 174 



DISPREG 


: .WORD 





SWREG: 


.WORD 





JMP ■ 


START 




.=210 






JMP 


RSTLDR 




.=220 






JMP 


SCAN 




.=230 






JMP 


RSTART 





;GENERAL DATA AREA 


TSTX- 





FTITlE: 





TEMPX: 





ADRPT: 





BITPT: 





TRFLG: 





TYFLG: 





TYCOR: 





HIADR: 





TSTLOC: 






;THIS IS THE SOFTWARE DISPLAY REGISTER 
;THIS IS THE SOFTWARE SWITCH REGISTER 
;G0 TO START OF PROGRAM 

;G0 RESTORE THE LOADERS 

;SCAN FOR BAD PARITY 

; RESTART WITHOUT RETYPING MAP INFORMATION 



;TITLE PRINTED « 1 

;MAPPING- ADDRESS POINTER 

;MAPPING- BIT POINTER INDICATING BANK 

;MAPPING- TRANSISTION FLAG 

;MAPPING- TYPED FLAG 

;MAPPING- K CORE ACCUMULATOR 

;USED TO CHECK WHEN DONE TESTING A BANK 

; LOADED W-TH ADDRESS OF LOCATION UNDER 

;TEST IN SOME SUBTESTS 
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433 


000534 


000000 


434 


000536 


000000 


435 


000540 


000000 


436 


000542 


000000 


437 


000544 


000000 


438 


000546 


000000 


439 


000550 


000000 


440 


000552 


000000 


441 


000554 


000000 


442 


000556 


000000 


443 






444 


000560 


000000 


445 


000562 


000000 


446 






447 


000564 


000000 


448 






449 






450 






451 






452 






453 






454 






455 






456 






457 






458 






459 






460 






461 






462 






463 






464 






465 






466 






467 






468 






469 






470 






471 






472 






473 






474 






475 






476 






477 






478 


000566 


172101 


479 


000570 


000000 


480 


000572 


000000 


481 


000574 


cooooo 


482 


000576 


1 721 03 


483 


000600 


000000 


484 


000602 


000000 


485 


000604 


000000 


486 


000606 


172105 


487 


000610 


000000 


488 


000612 


000000 



0A(1052) 13-JAN^- 


SHDBE: 





WAS: 





trdata: 





MPROK: 





TBANK: 





MEMUT : 





NQKT: 





HIWORD-* 





LOWFLG: 





ODDFLG: 





TEMP". 





MTYFG: 
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MEMORY PARITY CONTROL RE 
THE LEAST SIGNIFICANT BI 
IF THE CONTROL IS FOUND 
CONTROL OF EACH CONTROLL 
REPRESENTS A 4K BLOCK, I 
THE LOW BYTE OF THE LAST 
FOR THE FIRST ADDRESS TH 
SET TO 1 TO INDICATE THA 
FOR EXAMPLE, SAY THAT MP 
FROM TO 16K, AND THAT 
THE MAP WOULD THEN LOOK 
MPRO: 172100 

17 



400 



MPRi: 172102 
17 



GISTER ADDR 
T IN THE DE 
NOT TO BE P 
ER IS REPRE 

E. BITO 

WORD FOR E 
AT ACTUALLY 
T A MEMORY 
RO AND MPR1 
MPRO CONTRO 
AS TOLLOWS 



[■HE REST OF THE MAP WOULD APPEAR AS 



MPRO: 172100+1 







MPR1: 172102+1 





MPR2: 172104+1 





;VALUE EXPECTED 
;ACTUAL VALUE FOUND 



;SET TO INDICATE NO KT1 1 PRESENT 



;IF SET INDICATES TESTING HIGH BYTE 
;0F MEMORY LOCATION 



;SET TO INDICATE MAP OF PARITY MEMORY 
;ALR£ADY TYPED 



ESSES 

VICE ADDRESS IS SET TO A 0NE(1) 

RESENT. THE MEMORY PRESENT UNDER 

SENTED BY 2 OCTAL WORDS. EACH BIT 

-4K, BIT1 = 4-8K, BIT15= 60-64K. 

ACH REGISTER INDICATES THE OFFSET (0,2, 4, OR 6) 

CORRESPONDED TO THE REGISTER. THE HIGH BYTE GETS 
ADDRESS HAS BEEN FOUND FOR THAT REGISTER. 

EXIST, CONTROLLING INTERLEAVED MEMORY 
LS THE ADDRESSES ENDING IN AND 4. 

;BIT IS CLEAR SINCE REGISTER IS PRESENT 
{REGISTER CONTROLS 1ST 16K (=4 BANKS) 

; LOW BYTE SHOWS THAT FIRST ADDRESS 

;ENDS IN (OCTAL) 

;HIGH BYT£ CONTAINS A 1 TO INDICATE 

;THAT AN ADDRESS WAS FOUND 

; BIT IS CLEAR SINCE REGISTER IS PRESENT 

-.REGISTER CONTROLS 1ST 16K 

;LOW BYTE INDICATES THAT THE FIRST 
;MEMORY ADDRESS ENDS IN 2 (OCTAL) 
;HIGH BYTE CONTAINS A 1 TO INDICATE 
;THAT AN ADDRESS WAS FOUND 
IN THE LISTING 



PARITY STATUS REGISTERS 
0-64K PARITY MEM UNDER THIS CONTROL 
64-1 24K PARITY MEM UNDER THIS CONTROL 
ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

;0-64K PARITY MEM UNDER THIS CONTROL 
-.64-124K PARITY MEM UNDER THIS CGNTROL 
;ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

*,0-64K PARITY MEM UNDER THIS CONTROL 
;64-l24K PARITY MEM UNDER THIS CONTROL 



CCMFAFO, MEMORY PARITY TEST 
CCMFAF.P11 13-JAN-78 12:13 



MACY11 30A(1052) 1 3-JAN-78 12:27 PAGE 10 



SEO 0010 



489 


000614 


000000 


490 


000616 


172107 


491 


000620 


000000 


492 


000622 


000000 


493 


000624 


000000 


494 


000626 


1 721 1 1 


495 


000630 


COOOOO 


496 


000632 


000000 


497 


000634 


000000 


498 


000636 


1721 1 3 


499 


000640 


000000 


500 


000642 


000000 


501 


000644 


000000 


502 


000646 


1721 15 


503 


000650 


000000 


504 


000652 


000000 


505 


000654 


cooooo 


506 


000656 


1721 17 


507 


000660 


000000 


508 


000662 


000000 


50S 


000664 


000000 


510 


000666 


172121 


511 


000670 


000000 


512 


000672 


000000 


513 


000674 


000000 


514 


000676 


172123 


515 


000700 


000000 


516 


000702 


000000 


517 


000704 


000000 


518 


000706 


172125 


519 


000710 


000000 


520 


000712 


000000 


521 


000714 


oooooo 


522 


000716 


172127 


523 


000720 


oooooo 


524 


000722 


oooooo 


525 


000724 


oooooo 


526 


000726 


172131 


527 


000730 


OOOOOO 


528 


000732 


OOOOOO 


529 


000734 


OOOOOO 


530 


000736 


172133 


531 


000740 


OOOOOO 


532 


000742 


OOOOOO 


533 


000744 


OOOOOO 


534 


000746 


172135 


535 


000750 


OOOOOO 


536 


000752 


OOOOOO 


537 


000754 


oooooo 


538 


000756 


172137 


539 


000760 


oooooo 


540 


000762 


oooooo 


541 


000764 


oooooo 


542 






543 


000766 


oooooo 


544 







172106+1 





1721 10+1 







172112+1 







1721 14+1 



MPR8: 


172120+1 

















MPR9: 


172122+1 

















MPR10: 


172124+1 

















MPR11 : 


172126+1 

















MPR12: 


172130+1 

















MPR13: 


172132+1 

















MPR14: 


172134+1 

















MPR15: 


172136+1 

















TREG: 






;ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

0-64K PARITY MEM UNDER THIS CONTROL 
64-124K PARITY MEM UNDER THIS CONTROL 
ADDRESS RESPONSE THIS CONTROL (0.2,4,6) 

;0-64K PARITY MEM UNDER THIS CONTROL 
;64-l24K PARITY MEM UNDER THIS CONTROL 
;ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

;0-64K PARITY MEM UNDER THIS CONTROL 
;64-124K PARITY MEM UNDER THIS CONTROL 
;ADDRESS RESPONSE THIS CONTROL (0,2.4,6) 

0-64K PARITY MEM UNDER THIS CONTROL 
64-124K PARITY MEM UNDER THIS CONTROL 
ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

0-64K PARITY MEM UNDER THIS CONTROL 
64-124K PARITY MEM UNDER THIS CONTROL 
ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

;0~64K PARITY MEM UNDER THIS CONTROL 
;64-124K PARITY MEM UNDER THIS CONTROL 
-.ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

0-64K PARITY MEM UNDER THIS CONTROL 
64-124K PARITY MEM UNDER THIS CONTROL 
ADDRESS RESPONSE THIS CONTROL (0.2,4,6) 

;0~64K PARITY MEM UNDER THIS CONTROL 
;64-124K PARITY MEM UNDER THIS CONTROL 
;ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

0-64K PARITY MEM UNDER THIS CONTROL 
64-124K PARITY MEM UNDER THIS CONTROL 
ADDRESS RESPONSE THIS CONTROL (0.2,4,6) 

0-64K PARITY MEM UNDER THIS CONTROL 
64-124K PARITY MEM UNDER THIS CONTROL 
ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

;0-64K PARITY MEM UNDER THIS CONTROL 
;64-124K PARITY MEM UNDER THIS CONTROL 
;ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

;0-64K PARITY MEM UNDER THIS CONTROL 
;64~124K PARITY MEM UNDER THIS CONTROL 
;ADDRESS RESPONSE THIS CONTROL (0,2,4,6) 

;0-64K PARITY MEM UNDER THIS CONTROL 
;64-l24K PARITY MEM UNDER THIS CONTROL 
-.ADDRESS RESPONSE THIS CONTROL (0.2,4,6) 

; PARITY REGISTER UNDER TEST 
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545 






546 






547 






548 






549 






550 






551 






552 






553 






554 






555 






556 


000770 


000000 


557 


000772 


000000 


558 


000774 


000000 


559 


000776 


000000 


560 


001000 


000000 


561 


001002 


000000 


562 


001004 


oooooo 


563 


001006 


000000 


564 


001010 


oooooo 


565 


001012 


oooooo 


566 


001014 


oooooo 


567 


001016 


oooooo 


568 


001020 


oooooo 


569 


001022 


oooooo 


570 


001024 


oooooo 


571 


001026 


oooooo 


572 


001030 


oooooo 


573 






574 






575 


001032 


070032 


576 


001034 


077772 


577 






578 






579 






580 






581 






582 


001036 


125325 


583 


001040 


152652 


584 


001042 


052452 


585 


001044 


025125 


586 


001046 


102070 


587 


001050 


072527 


588 


001052 


177777 


589 


001054 


107030 


590 


001056 


152525 


591 


001060 


OOOOOO 


592 


001062 


OOOOOO 


593 






594 






595 






596 


001064 


OOOOOO 


597 


001066 


OOOOOO 


598 






599 






600 


001070 


OOOOOO 



INDICATORS FOR CORE OR MOS PARITY REGISTER: 

;EACH INDICATOR REFERS TO A PARTICULAR PARITY REGISTER. IF IT 

;A CORE PARITY REGISTER THEN A ' 1' IS STORED IN THE INDICATOR. 

;IF IT IS A MOS PARITY REGISTER THEN '-1' GETS STORED. 

;EX= IF MPRO (172100) IS FOR CORE AND MPR1 (172102) IS FOR MOS 

;THEN THE INDICATOR MAP WILL LOOK AS FOLLOWING: 

;INDC0: 000001 

;INDC1: 177777 



INDCO: 





INDC1 : 





INDC2: 





INDC3: 





INDC4: 





INDC5: 





INDC6: 





INDC7: 





INDC8: 





INDC9: 





INDC10: 





INDC1 1 : 





INDC12: 





INDC13: 





INDC14: 





INDC15: 





RESRVD: 





RESVC: 


70032 


RESVM: 


77772 



;PARITY PATTERNS 
PARPAT: 125325 
152652 
052452 
025125 
102070 
072527 
177777 
107030 
152525 





;CORE-MOS PARITY INDICATOR FOR M'-l 
;CORE-MOS PARITY IDCICATOR FOR MPR1 
;CORE-MOS PARITY INDICATOR FOR MPR2 
;CORE-MOS PARITY INDICATOR FOR MPR3 

;FOR MPR4 
;FOR MPR5 
;FOR MPR6 
;FOR MPR7 
;FOR MPR8 
;FOR MPR9 
;FOR MPR10 
;FOR MPR1 1 
;FOR MPR12 
; FOR MPR13 
;FOR MPR14 
;FOR MPR15 

;BIT POSITIONS WHICH ARE RESERVED 
;FOR FUTURE USE IN PARITY REGISTERS 
;CORE PARITY 
;MOS PARITY 



;EVEN,ODD BYTES 

;ODD,EVEN 

;EVEN,ODD 

;ODD,EVEN 

;EVEN,EVEN 

;ODD,ODD 

;EVEN,EVEN 

;ODD,ODD 

;ODD,EVEN 

; EXTRA PATTERN AREA 

;TERMINATOR, DO NOT USE THIS LOC 



;THIS IS A MAP OF THE TOTAL MEMORY PRESENT IN THE SYSTEM. 

MEML: ;0-64K MEM PRESENT IN 4K CONTIGUOUS BLOCKS 

MEMH: ;64-124 MEM PRESENT IN 4K CONTIGOUS BLOCKS 

;THIS IS A MAP OF THE TOTAL PARITY MEMORY PRESENT IN THE SYSTEM. 
PMEML: ;0-64K PARITY MEMORY PRESENT 
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601 
602 
603 
604 
605 
606 
607 
608 
609 



001072 
001074 



OOOOOO 
OOOOOO 
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PMEMH: 
PMEMX: 



SEO 0012 



;(IN 4K CONTIGUOUS BLOCKS) 
;64-124K PARITY MEMORY PRESENT 
;(1N 4K CONTIGUOUS BLOCKS) 
;TEMP TO HOLD CONTENTS OF EITHER 
;LOW OR HIGH MAP 



613 








614 




001100 




615 


001100 


177570 




616 


001 102 


177570 




617 


001 104 


177564 




618 


001 106 


177566 




619 


001 1 10 


000 




620 


0011 1 1 


002 




621 


001 1 12 


000 




622 


0011 13 


000 




623 








624 


0011 14 


105767 


177772 


625 


001 120 


001401 




626 


001 122 


OOOOOO 




627 


001 124 


010046 




628 


001 126 


017600 


000002 


629 


001 132 


112046 




630 


001 134 


001005 




631 


001 136 


005726 




632 


001140 


012600 




633 


001142 


062716 


000002 


634 


001146 


000002 




635 


001150 


004767 


000026 


636 


001154 


122726 


000012 


637 








638 


001160 


001364 




639 


001 162 


016746 


177722 


640 








641 


001166 


105366 


000001 


642 


001 172 


002770 




643 


001174 


004767 


000002 


644 


001200 


000772 




645 


001202 


105777 


177676 


646 


001206 


100375 




647 


001210 


116677 


000002 177670 


648 








649 


001216 


000207 




650 








651 








652 








653 








654 








655 


001220 


OOOOOO 




656 









;GENERAL DATA AREA 
SCNFLG: 



;ROUTINE TO TYPE ASCII MESSAGES, MESSAGE MUST TERMINATE WITH A BYTE. 
;THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
;N0TE1: $NULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
;N0TE2: $FILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 



ADDRESS OF THE SWITCH REGISTER 
ADDRESS OF THE DISPLAY REGISTER 
PRINTER STATUS REGISTER ADDRESS 
PRINTER BUFFER REGISTER ADDRESS 
CONTAINS NULL CHARACTER FOR FILLS 
CONTAINS H OF FILLER CHARACTERS REQUIRED 
"TERMINAL AVAILABLE" FLAG (0=YES) 
RESERVED 

IS THERE A TERMINAL? 

BR IF YES 

HALT HERE IF NO TERMINAL 

SAVE RO 

GET ADDRESS OF ASCIZ STRING 

PUSH CHARACTER TO BE TYPED ONTO STACK 

BR IF IT ISN'T THE TERMINATOR 

IF TERMINATOR POP IT OFF THE STACK 

RESTORE RO 

ADJUST RETURN PC 

RETURN 

GO TYPE .HIS CHARACTER 

CHECK IF THE CHARACTER TYPED 

WAS A LINE FEED 

GO GET NEXT CHARACTER IF NOT LINE FEED 

GET H OF FILLER CHARACTERS NEEDED 

AND THE NULL CHARACTER 

DOES A NULL NEED TO BE TYPED? 

BR IF NO— GO POP THE NULL OF THE STACK 

GO TYPE A NULL 

LOOP 

WAIT UNTIL PRINTER IS READY 

;LOAD CHARACTER TO BE 
;TYPED INTO DATA REGISTER 





.=1100 




SWR: 


.WORD 


DSWR 


DISPLAY 


: .WORD 


DDISP 


TPS: 


177564 




TPB: 


177566 




SNULL: 


.BYTE 





SFILLS: 


.BYTE 


2 


STPFLG: 


-BYTE 







.BYTE 





STYPE: 


TSTB 


STPFLG 




BEQ 


6$ 




HALT 




6$: 


MOV 


RO,-(SP) 




MOV 


@2(SP),R0 


1$: 


MOVB 


(RO)+,-(SP) 




BNE 


2$ 




TST 


(SP) + 




MOV 


(SP)+,RO 


7$: 


ADD 
RTI 


#2, (SP) 


25: 


JSR 


PC, 5$ 


3$: 


CMPB 


#12,(SP).+ 




BNE 


1$ 




MOV 


$NULL,-(SP) 


4$: 


DECB 


KSP) 




BLT 


3$ 




JSR 


PC, 5$ 




BR 


4$ 


5$: 


TSTB 


@TPS 




BPL 


5$ 




MOVB 


2(SP) ,@TPB 



;SCNFLG GETS SET IF USING 
;SCAN ROUTINE (SA=220) 
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657 


001222 


000000 




CACHFL: 







658 


001224 


177746 




CACHE: 


177746 




659 


001226 


000000 




KTSTART 







660 


001230 


000000 




ADRTYP: 







661 


001232 


177600 




PDRTAB: 


177600 




662 


001234 


172200 






172200 




663 


001236 


1 72300 




PDREND: 


172300 




664 


001240 


172300 




KPDRO: 


172300 




665 


001 242 


172302 




KPDRI : 


172302 




666 


001244 


172304 




KPDR2 : 


172304 




667 


001246 


172316 




KPDR7: 


172316 




668 


001250 


172340 




KPARO : 


1723^0 




669 


001252 


17 2342 




KPAR1 : 


172342 




670 


001254 


172344 




KPAR2: 


172344 




671 


001256 


172356 




KPAR7 : 


172356 




672 


001260 


000000 




SPSAV: 







673 


001262 


000000 




ROSAV: 







674 


001264 


000000 




R1SAV: 







675 


001266 


000000 




R2SAV: 







676 


001270 


000000 




R3SAV: 







677 


001272 


000000 




R4SAV. 







678 


001274 


000000 




R5SAV: 







679 














680 














681 














682 








;ROUTINE TO RESTART WITHOUT 


683 


001276 


012706 


000510 


RSTART: 


MOV 


#STKPT ,SP 


684 


001302 


01 2767 


000001 


177252 


MOV 


#1 , MTYFG 


685 


001310 


005067 


010436 




CLR 


PASCNT 


686 


001314 


012737 


015732 


000024 


MOV 


#PWRDN,@#24 


687 


001322 


01 2737 


000340 


000026 


MOV 


#340,<a#26 


688 


001330 


005067 


1 77154 




CLR 


TSTX 


689 


001334 


005037 


177776 




CLR 


(B>#PS 


690 


001340 


012737 


000006 


000004 


MOV 


#6,@#4 


691 


001346 


005037 


000006 




CLR 


@#6 


692 


001352 


000167 


000530 




JMP 


BEGIN 


693 














694 














695 














696 














697 








; ROUTINE TO SCAN ALL MEMORY 


698 








; LOCATIONS 




699 


001356 


012706 


000510 


SCAN: 


MOV 


0STKPT.SP 


700 


001362 


005767 


177124 




TST 


FTITLE 


701 














702 














703 


001366 


001006 






BNE 


SCANB 


704 


001370 


005267 


177624 




TNC 


SCNFLG 


705 


001374 


000167 


000232 




JMP 


START1 


706 


001400 


005067 


177614 


SCANA: 


CLR 


SCNFLG 


707 


001404 


004767 


010346 


SCANS: 


JSR 


PC t MAPMEM 


708 


001410 


004767 


013100 




JSR 


PC.PSCAN 


709 


001414 


104000 






TYPE 




710 


001416 


01 7603 






PSMSG 




711 


001420 


005767 


177124 




TST 


NOKT 


712 


001424 


001002 






BNE 


.+6 



; CACHE FLAG 
;CACHE CSR 



;K£RNEL PAGE DESCRIPTOR REGISTER ADDRESSES 



;KERNEL PAGE ADDRESS REGISTER ADDRESSES 



; REGISTER SAVE LOCATIONS 



SET UP STACK POINTER 

SET FLAG TO INDICATE MAP HAS BEEN TYPED 

INITIALIZE PASS COUNT 



;CLEAR PROCESSOR STATUS REGISTER 



SETUP STACK POINTER 

IF TITLE HAS BEEN PRINTED, REGISTERS 

HAVE ALREADY BEEN LOCATED- GO 

AND LOCATE IF NOT ALREADY DONE 

BRANCH, REGISTERS HAVE ALREADY BEEN LOCATED 

INCREMENT SCNFLG 

GO TO LOCATE THE REGISTERS 

RETURN HERE AFTER LOCATING THE REGISTERS 

SETUP MEMORY MAP 

SCAN FOR BAD PARITY 

TYPE MESSAGE "BAD PARITY SCAN COMPLETE" 



CCMFAFO, MEMORY PARITY TEST 
CCMFAF.P11 13-JAN-78 12:13 



MACY11 30A(1C52) 13-JAN-78 12:27 PAGE 14 



SEO 0014 



713 
714 
715 
716 
717 
718 
719 
720 
721 
722 
723 
724 
725 
726 
727 
728 
729 
730 
731 
732 
733 
734 
735 
736 
737 
738 
739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
750 
751 
752 
753 
754 
755 
756 
757 
758 
759 
760 
761 
762 
763 
764 
765 
766 
767 
768 



001426 005037 177572 
001432 000000 
001434 000750 



CLR 


@#SRO 


HALT 




BR 


SCAN 



001436 
001442 
001446 
001452 
001460 
001466 
001472 
001476 
001504 
001510 
001512 
001520 
001526 
001530 
001536 
001544 
001552 
001560 
001562 
001564 
001570 
001574 
001600 
001604 
001606 
001612 
001620 
001622 
001624 
001626 
001630 



001632 
001634 
001636 
001642 
001646 
001652 
001660 
001664 
001670 
001674 



01 2706 
005067 
005067 
01 2737 
01 2737 
01 3746 
01 3746 
012737 
005777 
000407 
01 2767 
01 2767 
022626 
012737 
012737 
052737 
052767 
000401 
022626 
012637 
012637 
005067 
005767 
001012 
005267 
023737 
001404 
104000 
017257 
104000 
017636 



104000 
01 7026 
005067 
01 2702 
012703 
012737 
005037 
042712 
005062 
005062 



000510 
1771 14 

010300 
015732 
000340 
000004 
000006 
001512 
177370 

000176 
000174 

001562 
000340 
000014 
000200 



000006 
000004 
176710 
176706 

176700 
000042 



176700 
000566 
000770 
002012 
000006 
000001 
000002 
000004 



000024 
000026 



177360 
177354 

000004 
000006 
177746 
177442 



;NORMAL STARTUP 
START: MOV 

CLR 

CLR 

MOV 

MOV 

MOV 

MOV 

MOV 

TST 

BR 
2$: MOV 

MOV 

CMP 
4$: MOV 

MOV 

BIS 

BIS 



6$: 

5$: 



BR 

CMP 

MOV 

MOV 

CLR 

TST 

BNE 

INC 

CMP 

BEQ 

TYPE 

MTIT 

TYPE 

MLDRSV 



#STKPT,SP 

MTYFG 

PASCNT 

#PWRDN,@#24 

#340, (M26 

@#4,-(SP) 

<P#6,-(SP) 

#2$,(a#4 

@SWR 

4$ 

#SWREG,SWR 

#DISPREG, DISPLAY 

(SP) + , (SP.) + 

#6$,@#4 

#340,@>#6 

#14, ©#177746 

#200, CACHFL 

5$ 

(SP) + ,(SP') + 

(SP) + ,§>#6 

(SP ) + ,<§># 4 

TSTX 

FTITLE 

START1 

FTITLE 

@#42,@#46 

START1 



;TURN OFF KT11 IF PRESENT 
;END OF PARITY SCAN 



SET UP STACK POINTER 

CLEAR FLAG WHICH INDICATES MAP TYPED 

INITIALIZE PASS COUNT 

SETUP POWER FAIL RETURN 

SAVE THE ERROR VECTOR 

SET UP TIME OUT VECTOR 

TRY TO REFERENCE THE SWITCH REGISTER 

BRANCH IF NO TIME OUT 

POINT TO THE SOFTWARE SWITCH REGISTER 

POINT TO THE SOFTWARE DISPLAY REG. 

RESTORE THE STACK POINTER 



;DISABLE CACHE 

;SET FLAG FOR CACHE 



;RESTORE ERROR VECTOR 



IS TITLE PRINTED YET? 

YES, SKIP OVER 

SET FLAG 

ARE WE IN ACT11 AUTOMATIC MODE? 

YES, SKIP TITLE 

TYPE TITLE "MEMORY PARITY TEST 

MAINDEC-1 1-DCMFA" 

;TYPE "LOADERS SAVED IN BANK 1. 



SEARCH FOR PARITY REGISTERS PRESENT AND TYPE ADDRESSES OF THOSE FOUND 
FAILURE TO LOCATE A REGISTER INDICATES THAT THE ADDRESS TIMED OUT OR THAT 

;TYPE "MEMORY PARITY REGISTERS PRESENT ARE:" 

;CLEAR MPR FLAG 

;SET UP POINTERS 

; POINTER TO CORE-MOS 

;SET UP TIMEOUT TRAP RETURN 

:CLEAR FLAG BIT IN TABLE 

; INITIALISE LOCATIONS IN THE TABLE 



JBITC 


5-7 IN 


THE REGISTER DID NOT 


STAR'l 


: TYPE 
MMPRS 






CLR 


MPROK 




MOV 


#MPR0,R2 




MOV 


#INDC0,R3 




MOV 


#GMPRB,@#4 




CLR 


<P#6 


GMPRA 


BIC 


#1.(2) 




CLR 


2(R2) 




CLR 


4{R2) 
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769 


001700 


005062 


000006 


770 


001704 


005772 


000000 


771 


001710 


052772 


000340 000000 


772 


001716 


032772 


000340 000000 


773 


001724 


001414 




774 


001726 


01 1267 


176562 


775 


001732 


004567 


013460 


776 


001736 


000514 




777 


001740 


017670 




778 


001742 


000006 




779 


001 744 


104000 




780 


001746 


017670 




781 


001750 


012713 


000001 


782 


001754 


000413 




783 


001756 


01 1267 


176532 


784 


001762 


004567 


013430 


785 


001766 


000514 




786 


001770 


01 7731 




787 


001772 


000006 




788 


001774 


104000 




789 


001776 


017731 




790 


002000 


012713 


177777 


791 


002004 


005267 


176532 


792 


002010 


000403 




793 


002012 


022626 




794 


002014 


052712 


000001 


795 


002020 


062702 


000010 


796 


002024 


005723 




797 


002026 


020227 


000766 


798 


002032 


002714 




799 


002034 


01 2737 


000006 000004 


eoo 


002042 


005767 


177152 


801 








802 


002046 


001402 




803 


002050 


000167 


177324 


804 








805 


002054 


005767 


176462 


806 


002060 


001012 




807 


002062 


104000 




808 


002064 


01 7212 




809 


002066 


005737 


000042 


810 


002072 


001402 




811 


002074 


000167 


007572 


812 


0021 00 


000000 




813 


002102 


000167 


177330 


814 








815 


002106 


012767 


002156 014346 


816 


0021 14 


105767 


177102 


817 


002120 


001403 




818 


002122 


01 2777 


000014 177074 


819 


002130 


004767 


012146 


820 


002134 


012767 


000100 014314 


821 


002142 


012737 


000006 000004 


822 


002150 


005067 


176344 


823 








824 
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CLR 


6(R2) 




TST 


<P(2) 




BIS 


#340, @(2) 




BIT 


#340, <P>(2) 




BEO 


1$ 




MO'.' 


(2), TEMPX 




JSR 


R5.0ACNV 




TEMPX 






MPRCOR 






6 






TYPE 






MPRCOR 






MOV 


#1 ,(R3) 




BR 


2$ 


1$: 


MOV 


(2), TEMPX 




JSR 


R5.0ACNV 




TEMPX 






MPRMOS 






6 






TYPE 






MPRMOS 






MOV 


#-1 ,(R3) 


2$: 


INC 


MPROK 




BR 


GMPRC 


GMPRB: 


CMP 


(SP)+,(SP)+ 




BIS 


#1 ,@R2 


GMPRC: 


ADD 


#10, R2 




TST 


(R3) + 




CMP 


R2,#TREG 




BLT 


GMPRA 




MOV 


#6,@#4 




TST 


SCNFLG 




BEO 


GMPRD 




JMP 


SCANA 


GMPRD: 


TST 


MPROK 




BNE 


BEGIN 


NOREG: 


TYPE 
MTR 






TST 


(?>#42 




BEO 


.4-6 




JMP 


LOGICAL 




HALT 






JMP 


START 


BEGIN: 


MOV 


#TEST1+2, RETURN 




TSTB 


CACHFL 




BEO 


. + 10 




MOV 


#14,@CACHE 




JSR 


PC.SAVLDR 




MOV 


#100,IMAX 




MOV 


#6,@>#4 




CLR 


BITPT 



;DOES THIS MPR EXIST? (IF NO, TIMES OUT) 

;YES- IS IT AN MF11-LP OR MA11-P CORE PARITY REG 

;N0, IS IT A MOS-11 PARITY REGISTER? BRANCH 
;YES- PRINT REGISTER ADDRESS 
;(GET ASCII) 



; (TYPE ADDRESS) 

;SET INDICATOR FOR CORE PARITY 



; IT IS A MQS REGISTER. PRINT ADDRESS 
;(GET ASCII) 



; (TYPE ADDRESS) 

;SET INDICATOR FOR MOS PARITY 

;SET MPR REGISTER PRESENT FLAG 

;SKIP NEXT 

;RESTORE STACK POINTER 

;SET FLAG INDICATING REGISTER NOT PRESENT 

;UPDATE POINTER 

;DONE YET? 

;N0. LOOP 

;YES f RESTORE TRAPCATCHER 

;ARE YOU IN THE ROUTINE TO SCAN 

JMEMORY FOR BAD PARI TY- ( SCAN) 

;NO,BRANCH TO CARRY ON NORMALLY 

;YES, GO uACK TO THE MEMORY 

;SCAN ROUTINE 

;ANY PARITY REGISTERS PRESENT? 

;YES- GO TEST CONTROLS PRESENT 

;N0- TYPE "NO PARITY REGISTER FOUND" 

; LOADED BY MONITOR? 

;N0, BRANCH 

;YES- EXIT, NO REGISTERS PRESENT 

;N0 REGISTERS TO TEST 

;IF CONTINUED, TRY AGAIN 

;SETUP SCOPE RETURN 

;CACHE ? 

;BRANCH IF NO 

;DiSABLE CACHE 

;SAVE MONITOR 

;MAXIMUM ITERATION COUNT 

;RESTORE TRAPCATCHER IN TIMEOUT VECTOR 
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825 


















826 












** ** 


********** 


***************** 


827 












SHOW 


THAT BITS 


0,2,5-1 1 , AND 15 


828 












CAN 


BE SET AND 


CLEARED. BITS 


829 












PRESENT CAN BE 


SET AND CLEARED 


830 












***•• 


********** 


*****************„ 


831 


002154 


104001 






TEST1 


: SCOPE 




832 


002156 


012777 


000001 


176716 




MOV 


#1 , ©DISPLAY 


833 


002164 


012700 


000566 






MOV 


#MPRO,RO 


834 


0021 70 


01 2704 


000770 






MOV 


#INDC0,R4 


835 


002174 


032710 


000001 




1$: 


BIT 


#1 ,@R0 


836 


002200 


001042 








BNE 


4$ 


837 


002202 


01 1001 








MOV 


@R0,R1 


838 
















839 


002204 


022714 


000001 






CMP 


#1 ,(R4) 


840 


002210 


001004 








BNE 


5$ 


841 


002212 


016767 


176614 


176610 




MOV 


RESVC.RESRVD 


842 


002220 


000403 








BR 


.+10 


843 


002222 


016767 


176606 


176600 


5$: 


MOV 


RESVM.RESRVD 


844 


002230 


012702 


000001 






MOV 


#1 ,R2 


845 
















846 


002234 


00501 1 








CLR 


@R1 


847 


002236 


01 1 167 


176524 






MOV 


@R1 ,TREG 


848 


002242 


046767 


176562 


176516 




BIC 


RESRVD.TREG 


849 


002250 


001401 








BEO 


.+4 


850 


002252 


104002 








ERROR 




851 
















852 
















853 
















854 


002254 


030267 


176550 




2$: 


BIT 


R2.RESRVD 


855 


002260 


001010 








BNE 


3$ 


856 
















857 


002262 


010211 








MOV 


R2,@R1 


858 


002264 


01 1103 








MOV 


@R1 ,R3 


859 


002266 


005011 








CLR 


@R1 


860 


002270 


046703 


176534 






BIC 


RESRVD,R3 


861 
















862 


002274 


020203 








CMP 


R2.R3 


863 


002276 


001401 








BEO 


.+4 


864 


002300 


104002 








ERROR 




865 
















866 
















867 
















868 


002302 


006302 






3$: 


ASL 


R2 


869 


002304 


103363 








BCC 


2$ 


870 
















871 


002306 


062700 


000010 




4$: 


ADD 


#10, RO 


872 


002312 


005724 








TST 


(R4) + 


873 
















874 


002314 


020027 


000766 






CMP 


RO,#TREG 


875 


002320 


002725 








BLT 


1$ 


876 
877 


002322 


005067 


176440 






CLR 


TREG 


878 










;***** 


********** 


***************** 


879 
















880 










• 


SHOW 


THAT RESET 


CLEARS BITS 0.0 



OF EACH CORE PARITY REGISTER PRESENT 
2,15 OF EACH MOS PARITY REGISTER 



;LOAD THE TEST NUMBER INTO THE DISPLAY 

; LOAD ADDRESS OF TABLE INTO RO 

; LOAD ADDRESS OF INDICATOR IN R4 

;IS THIS REGISTER PRESENT? 

;N0- BRANCH TO GET NEXT ADDRESS 

;YES- LOAD R1 WITH ADDRESS OF 

;PARITY REGISTER 

;IS THIS REGISTER CORE? 

;YES, CORE. STORE RESERVED BITS 

;MOS. STORE RESERVED BITS 

;LOAD R2 WITH VALUE OF FIRST BIT 

;T0 BE TESTED 

INITIALIZE PARITY REGISTER 

;READ CONTENTS OF PARITY REGISTER 

;CLEAR BITS WHICH ARE RESERVED 

;CHECK OTHER BITS- BRANCH IF OK 

;CLEAR INSTRUCTION DID NOT INITIALIZE 

;ALL USED BITS IN PARITY REGISTER 

;T0 ZERO (R1 CONTAINS ADDRESS OF 

;FAILING REGISTER) 

;IS THIS BIT RESERVED? 

;YES- DON'T TEST IT SINCE IT 

;MAY BE ZERO OR ONE 

;N0- SET THIS BIT IN THE PARITY REGISTER 

;READ AND SAVE CONTENTS OF PARITY REGISTER 

'.CLEAR PARITY REGISTER 

ICLEAR BIT LOCATIONS THAT ARE 

RESERVED 

;CHECK REST 

;BRANCH IF OK 

;PARITY REGISTER WHOSE ADDRESS IS IN R1 

;WAS INCORRECT AFTER THE VALUE IN R2 

;WAS WRITTEN INTO IT. ACTUAL CONTENTS 

;(WITH UNUSED BITS CLEARED) IS IN R3 

;ROTATE BIT TO BE TESTED 

;IF NOT DONE WITH ALL BIT POSITIONS 

;G0 TEST THIS ONE 

;MOVE RO TO POINT TO NEXT POSSIBLE ADDRESS 

;0F A PARITY REGISTER 
;AT END OF TABLE? 
;N0, BRANCH 



SHOW THAT RESET CLEARS BITS 0,2, AND 15 OF EACH PARITY REGISTER 
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SEQ 0017 



881 








;PRESENT. 




882 








; #******+**#*** 


************** 


883 


002326 


104001 




TEST2: 


SCOPE 




884 


002330 


012777 


000002 176544 




MOV 


#2, ©DISPLAY 


885 


002336 


005067 


0141 14 




CLR 


IMAX 


886 


002342 


012700 


000566 




MOV 


#MPR0,R0 


887 


002346 


012703 


000770 




MOV 


#INDC0,R3 


888 


002352 


032710 


000001 


1$: 


BIT 


#1 ,@R0 


889 


002356 


001012 






BNE 


5$ 


890 


002360 


022713 


000001 




CMP 


#1 ,(R3) 


891 


002364 


001404 






BEQ 


6$ 


892 


002366 


012770 


100015 000000 




MOV 


#100015, ©(RO) 


893 


002374 


000403 






BR 


. + 10 


894 


002376 


012770 


107745 000000 


6$: 


MOV 


#107745, ®(R0) 


895 


002404 


062700 


000010 


5$: 


ADD 


#10, RO 


896 


002410 


005723 






TST 


(R3) + 


897 














898 


002412 


020027 


000766 




CMP 


RO,#TREG 


899 














900 


002416 


002755 






BLT 


1$ 


901 


002420 


105767 


176466 




TSTB 


$TPFLG 


902 


002424 


001003 






BNE 


4$ 


903 


002426 


105777 


176452 




TSTB 


@TPS 


904 


002432 


100375 






BPL 


.-4 


905 


002434 


000005 




4$: 


RESET 




906 


002436 


012700 


000566 




MOV 


#MPR0,R0 


907 


002442 


012703 


000770 




MOv 


#INDC0,R3 


908 


002446 


105767 


176550 




TSTB 


CACHFL 


909 


002452 


001403 






BEQ 


2$ 


910 


002454 


012777 


000014 176542 




MOV 


#14,@CACHE 


911 


002462 


032710 


000001 


2$: 


BIT 


#1 ,@R0 


912 


002466 


001030 






BNE 


3$ 


913 


002470 


022713 


000001 




CMP 


#1 , (R3) 


914 


002474 


001012 






BNE 


7$ 


915 


002476 


01 7002 


000000 




MOV 


@(R0) ,R2 


916 


002502 


005070 


000000 




CLR 


@(R0) 


917 


002506 


042702 


077772 




BIC 


#77772, R2 


918 














919 














920 


002512 


005702 






TST 


R2 


921 


002514 


001401 






BEO 


.+4 


922 


002516 


104002 






ERROR 




923 














924 














925 














926 


002520 


00041 1 






BR 


3$-4 


927 


002522 


01 7002 


000000 


7$: 


MOV 


@(R0) ,R2 


928 


002526 


005070 


000000 




CLR 


@(R0) 


929 


002532 


046702 


176276 




BIC 


RESVM.R2 


930 


002536 


005702 






TST 


R2 


931 


002540 


001401 






BEO 


.+4 


932 


002542 


104002 






ERROR 




933 














934 














935 














936 















LOAD THE TEST NUMBER INTO THE DISPLAY 

DON'T ITERATE TEST 

LOAD POINTER 

POINTER TO INDICATOR 

IS THIS PARITY REGISTER PRESENT? 

NO BRANCH 

IS THIS CORE OR MOS PARITY REGISTER? 

NO- BRANCH 

MOS-SET ALL DEFINED BITS TO 1 

CORE- SET ALL DEFINED BITS TO 1 

MOVE POINTER TO POINT TO NEXT MPR ADDRESS 

INCREMENT POINTER TO INDICATOR 

OF A PARITY REGISTER 

AT END OF TABLE? 

NO- CONTINUE 

YES- TERMINAL AVAILABLE? 

NO- BRANCH 

YES- WAIT FOR TERMINAL TO FINISH 

ISSUE INIT 

LOAD ADDRESS OF THE TABLE 

POINTER TO INDICATOR 

CACHE ? 

BRANCH IF NO 

DISABLE CACHE 

IS THIS PARITY REGISTER PRESENT? 

NO- BRANCH 

IS THIS A CORE PAR REGISTER? 

NO, BRANCH 

YES, GET CONTENTS OF PEGISTER 

MAKE SURE THAT WWP AND AE ARE CLEAR 

MASK RESERVED BITS FOR CORE PAR 

-1TY REGISTER. BITS 5~11(ADDRS 

BITS) ARE ALSO MASKED 
CHECK, IF REST WERE CLEARED 

CORE PARITY REGISTER WHOSE ADDRESS IS 
POINTED TO BY RO WAS INCORRECT 
AFTER A RESET WAS ISSUED- CONTENTS 
SAVED IN R2 WITH UNUSED BITS MASKED 

MOS, GET CONTENTS OF REGISTER 

MAKE SURE THAT WWP 8AE ARE CLEAR 

MASK RESERVED BITS FOR MOS PAR REG 

CHECK REST 

RESET DID CLEAR ALL BITS 

MOS PARITY REGISTER WHOOSE ADDRESS IS 

POINTED BY RO WAS INCORRECT. AFTER 

ISSUING RESET CONTENTS OF PAR REG 

WERE AS -HOWN IN R2(UNUSED BITS 

HAVE BEEN MASKED) 
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SEO 0018 



937 
938 
939 
940 
941 
942 
943 
944 
945 
946 
947 
948 
949 
950 
951 
952 
953 
954 
955 
956 
957 
958 
959 
960 
961 
962 
963 
964 
965 
966 
967 
968 
969 
970 
971 
972 
973 
974 
975 
976 
977 
978 
979 
980 
981 
982 
983 
984 
985 
986 
987 



002544 
002550 

002554 
002556 
002562 



005070 
062700 

005723 
020027 
002737 



002564 
002566 
002574 
002600 
002602 
002606 
002612 



002616 
002622 
002626 
002632 
002636 
002640 
002646 
002654 
002660 
002664 
002666 
002672 
002676 
002704 
002706 



000000 
000010 



104001 
012777 
005767 
001044 
004767 
004767 
004767 



005067 
005067 
01 2701 
032711 
001006 
056167 
056167 
062701 
020127 
103762 
004767 
005267 
032777 
001402 
000000 



000003 
175762 

011204 
007144 
007466 



176246 
176244 
000566 
000001 

000002 
000004 
000010 
000766 

010126 
175664 
001000 



CLR 

ADD 

TST 

CMP 
BLT 



@(R0) 
#10, RO 

(R3) + 

RO,#TREG 

2$ 



REINITIALIZE PARITY REGISTER 

MOVE POINTER TO POINT TO ADDRESS 

O c NEXT REGISTER 

INCREMENT POINTER TO INDICATOR 

DONE? 

NO- LOOP 



MAP CORRESPONDENCE BETWEEN PARITY REGISTERS AND MEMORY, AND TYPE RESULTS 
NOTE THAT IF PARITY MEMORY IS NOT LOCATED CORRECTLY BY THIS SUBTEST 
IT IS DUE TO ONE OF THE FOLLOWING FAILURES: 

-SETTING WRITE WRONG PARITY DID NOT CAUSE BAD PARITY TO BE WRITTEN 

-PARITY GENERATE OR DETECT LOGIC FAILED 

-PARITY ERROR BIT FAILED TO SET 

-PARITY BITS IN MEMORY LOCATION FAILED (I.E. BIT STUCK AT GOOD PARITY VALUE) 
NOTE THAT SETTING SWITCH REGISTER SWITCH 9 WILL CAUSE A HALT AFTER THE MAP 
IS TYPED. IF YOU WISH TO CHANGE THE MAP TO ISOLATE THE CAUSE OF A MAPPING 
FAILURE, YOU CAN DO THIS ONCE THE PROCESSOR IS HALTED. SEE THE DESCRIPTION 
IN THE LISTING (PRECEDING THE MAP TAG "MPRO" AT LOCATION 600) FOR THE MEANING 
OF THE MAP CONTENTS. AFTER MAKING THE DESIRED CHANGES, PRESS CONTINUE. THE NEW 
MAP WILL BE TYPED AND IF SWITCH 9 IS LEFT SET THE PROCESS WILL BE REPEATED. 
IF SWITCH 9 IS NOT LEFT SET THE PROGRAM WILL PROCEED TO TEST THE PARITY MEMORY 
AND REGISTERS AS RECORDED IN THE NEW MAP. 



TEST'. 



176222 
176216 



SCOPE 




MOV 


#3,<!>DISPLAY 


TST 


MTYFG 


BNE 


TEST4 


JSR 


%7,CLRPAR 


JSR 


%7,MAPMEM 


JSR 


%7,MAPREG 


CLR 


PMEML 


CLR 


PMEMH 


MOV 


#MPR0,R1' 


BIT 


#1 ,@R1 


BNE 


2$ 


BIS 


2(R1 ) , PMEML 


BIS 


4(R1 ) , PMEMH 


ADD 


#10, R1 


CMP 


R1 ,#TREG 


BLO 


1$ 


JSR 


%7,TMAP 


INC 


MTYFG 


BIT 


#BIT9,@SWR 


BEO 


.+6 


HALT 





002710 000742 



;LOAD THE TEST NUMBER INTO THE DISPLAY 
; IF MAPPING HAS ALREADY BEEN DONE 
;SKIP SUBTEST 

;MAP MEMORY 

; FIND PARITY MEMORY AND CORRESPONDING 
REGISTERS USING WRITE WRONG PARITY 
-.WITHOUT ACTION ENABLE SET 
;INITIALUE LOCATIONS INDICATING 
;TOTAL PARITY MEMORY PRESENT 



;FLAG EXISTING PARITY MEMORY (LOW 64K) 
;FLAG EXISTING PARITY MEMORY (HIGH 64K) 



;TYPE MAP 

; INDICATE MAPPING DONE 

;SWITCH 9 SET? 

;N0- BRANCH 

;YES- SWITCH 9 SET INDICATING HALT 

;AFTER TYPING PARITY MEMORY MAP 

;G0 TYPE NEW MAP TO VERIFY USER'S INTENT 



989 
990 
991 
992 



SHOW THAT ASSERT PB WORKS CORRECTLY FOR EACH REGISTER 
SHOW THAT NO TRAP OCCURS IF ACTION ENABLE (AE) IS NOT SET 



002712 
002714 
002722 
002730 
002734 
002740 
002742 
002746 



002752 
002756 
002762 
002766 
002770 
002774 
002776 
003000 
003002 



104001 
012777 
012767 
004767 
005767 
001004 
004767 
004767 



012700 
012702 
032710 
001405 
062700 
005722 
103771 
000457 
004767 



003006 
003012 
003014 



003016 
003022 
003030 
003036 

003040 
003044 

003046 
003054 

003062 
003070 



000004 
000100 
011056 
175610 

010744 
011110 



000566 
000770 
000001 
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993 
994 
995 
996 
997 
998 
999 
1000 
1001 
1002 
1003 
1004 
1005 
1006 
1007 
1008 
1009 
1010 
1011 
1012 
1013 
1014 
1015 
1016 
1017 
1018 
1019 
1020 
1021 
1022 
1023 
1024 
1025 
1026 
1027 
1028 
1029 
1030 
1031 
1032 
1033 
1034 
1035 
1036 
1037 
1038 
1039 
1040 
1041 
1042 
1043 
1044 
1045 
1046 
1047 
1048 
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176160 
013526 



;SHOW 


THAT SETTING AE WITH ERROR 


;NOTE 


THAT IF 


A KT11 IS PRESENT, 


; ***** 


******** 


****************** 


TEST4 


SCOPE 






MOV 


#4,!3>DISPLAY 




MOV 


#100,IMAX 




JSR 


%7,CLRPAR 




TST 


NOKT 




BNE 


1$ 




JSR 


%7,NRALL 




JSR 


%7,MAP1 


1$: 


MOV 


0MPRO.RO 




MOV 


#INDC0,R2 


L00P4 


BIT 


#1 ,@R0 




BEO 


TST4 


L0P4: 


ADD 


#10, RO 




TST 


(R2) + 




BLO 


L00P4 




BR 


D0NE4 


TST4: 


USR 


%7,L0CATM 



032701 
001403 
104002 



000167 177746 

012737 003110 

012770 000004 
01 1111 

005070 000000 
005711 

012737 003116 

052770 000001 

012737 003124 
005711 



BIT 


#1 ,R1 


BEO 


. + 10 


ERROR 





000114 
000000 



0001 14 
000000 



JMP 
MOV 
MOV 
MOV 

CLR 
TST 



MOV 
TST 



L0P4 

#TRP4A,@#114 
#WWP,@>(RO) 
@R1 ,@R1 

@(R0) 
PR1 

#TRP4B,@#PARVEC 
#AE,@(RO) 

#TRP4C,@#PARVEC 
@R1 



003072 104002 



ALREADY SET DOESN'T CAUSE A TRAP 
IT IS USED DURING THIS SUBTEST 



LOAD THE TEST NUMBER INTO THE DISPLAY 

CLEAR ALL PARITY REGISTERS 

KT1 1 PRESENT? 

NO-BRANCH 

YES-MAP ALL PAGES NON RESIDENT 

THEN MAP KERNEL TO BANK 0, KERNEL 

7 TO EXTERNAL BANK, SET KERNEL 

0,1, AND 7 RW. AND TURN ON KT11 

SETUP TO FIND REGISTERS PRESENT 

IS THIS REGISTER PRESENT? 
YES-BRANCH TO TEST IT 
NO-CHECK FOR ANOTHER ONE 
INCREMENT PTR9LT 

BRANCH WHEN ALL REGISTERS HAVE BEEN TESTED 

LOCATE MEMORY CORRESPONDING TO 

THIS REGISTER- IF NO KT11, R1 SHOULD 

BE RETURNED CONTAINING THE ADDRESS 

OF THE 1ST LOCATION CONTROLLED BY THIS 

REGISTER (INCLUDING EXTERNAL INTERLEAVE 

OFFSET IF NEEDED) 

IF KT11 IS PRESENT, R1 SHOULD BE RETURNED 

POINTING TO THE 1ST LOCATION CONTROLLED 

BY THIS REGISTER, MAPPED THRU KERNEL 

PAGE 1 . KERNEL PAGE 1 SHOULD BE 

MAPPED TO THE CORRECT BANK 

IS ERROR RETURN INDICATED? 

NO- BRANCH 

MAP INDICATES NO PARITY MEMORY 

IS CONTROLLED BY THIS REGISTER 

RO POINTS TO THE ADDRESS OF THE 

PARITY REGISTER 

SETUP PARITY TRAP RETURN 

SET WRITE WRONG PARITY 

WRITE CONTENTS OF LOCATION WITH 

WRONG PARITY 

CLEAR PARITY REGISTER 

READ BAD PARITY WITH ACTION ENABLE 

CLEARED- NO TRAP EXPECTED 

CHANGE PARITY TRAP RETURN 

SET ACTION ENABLE WITH PARITY ERROR 

ALREADY SET- SHOULDN'T TRAP YET 

CHANGE PARITY TRAP RETURN 

READ LOCATION AGAIN- SHOULD GET 

A PARITY TRAP DUE TO READING BAD 

PARITY WITH ACTION ENABLE SET 

NO PARITY TRAP AFTER READING LOCATION 

WHICH SHOULD CONTAIN CAD PARITY- 

R1 CONTAINS ADDRESS OF MEMORY LOCATION 
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1049 
1050 
1051 
1052 
1053 
1054 
1055 
1056 
1057 
1058 
1059 
1060 
1061 
1062 
1063 
1064 
1065 
1066 
1067 
1068 
1069 
1070 
1071 
1072 
1073 
1074 
1075 
1076 
1077 
1078 
1079 
1080 
1081 
1082 
1083 
1084 
1085 
1086 
1087 
1088 
1089 
1090 
1091 
1092 
1093 
1094 
1095 
1096 
1097 
1098 
1099 
1 100 
1101 
1 102 
1103 
1104 



003074 
003100 
003102 
0031 06 
0031 10 



0031 12 
0031 14 
0031 16 



003120 
003122 
003124 
003130 
003132 



003134 
003136 
003140 
003146 
003152 
003154 



003160 
003162 
003170 
003174 
003200 
003202 
003206 



003212 
003216 
003222 
003224 
003230 
003234 
003236 
003240 



005070 000000 

005511 

005070 000000 

000730 

104002 



022626 
000767 
104002 



022626 

000764 

005770 000000 

100401 

104002 



022626 
000756 
012737 
005767 
001002 
005037 



C0NT4: 


CLR 


§>(R0) 




ADC 


@R1 




CLR 


@(R0) 




BR 


L0P4 


TRP4A: 


ERROR 





CMP 
BR 
TRP4B: ERROR 



104001 
012777 
004767 
005767 
001004 
004767 
004767 



012700 
032710 
001406 
062700 
020027 
103770 
000431 
004767 



000116 
175376 



000005 
010616 
175350 

010504 
010650 



000566 
000001 



000010 
000766 



000114 D0NE4: 



(SP)+,(SP)+ 
C0NT4 



CMP 


(SP)+,(SP)+ 


BR 


C0NT4 


TST 


@(R0) 


BMI 


.+4 


ERROR 




CMP 


(SP)+,(SP)+ 


BR 


C0NT4 


MOV 


#PARVEC+2,@#PARVEC 


TST 


NOKT 


BNE 


.+6 


CLR 


@#SRO 



(VIRTUAL, THRU KERNEL PAGE 1, IF KT11 

PRESENT). RO POINTS TO THE ADDRESS OF 

THE PARITY REGISTER IN WHICH AE WAS SET 

CLEAR PARITY REGISTER 

CLEAR BAD PARITY 

CLEAR PARITY ERROR BIT 

GO TO TEST NEXT REGISTER 

PARITY TRAP OCCURRED WITH ACTION 

ENABLE CLEAR- RO POINTS TO THE ADDRESS 

OF THE PARITY REGISTER UNDER TEST 

R1 CONTAINS THE ADDRESS OF THE MEMORY 

UNDER TEST (VIRTUAL IF KT1 1 IS r RESENT) 

RESTORE STACK POINTER 

;PARITY TRAP OCCURRED WHEN ACTION 

;ENABLE WAS SET WITH PARITY ERROR 

;ALREADY SET 

;R0 POINTS TO THE ADDRESS OF THE 

;PARITY REGISTER UNDER TEST 

;R1 CONTAINS THE MEMORY ADDRESS UNDER 

;TEST (VIRTUAL IF KT11 IS PRESENT) 

'.RESTORE STACK POINTER 

ERROR BIT SET AFTER PARITY TRAP? 
YES- BRANCH 

ERROR BIT NOT SET AFTER PARITY 
TRAP- RO POINTS TO THE ADDRESS 
OF THE PARITY REGISTER UNDER TEST 
RESTORE STACK POINTER 

;RESTORE TRAP CATCHER 



;TURN OFF KT11 IF PRESENT 



SHOW THAT READING GOOD PARITY AFTER BAD PARITY DOESN'T CLEAR PARITY ERROR BIT 



;LOAD THE TEST NUMBER INTO THE DISPLAY 

'.CLEAR ALL PARITY REGISTERS 

;KT11 PRESENT? 

;N0, BRANCH 

;YES, MAP ALL PAGES NON-RESIDENT 

;THEN MAP KERNEL TO BANK 0. MAP KERNEL 

;7 TO THE EXTERNAL BANK. SET KERNEL 

;0,1, AND 7 RW, AND TURN ON KT11 

;SETUP TO FIND REGISTERS PRESENT 

;IS THIS REGISTER PRESENT? 

;YES- BRANCH TO TEST IT 

;N0- CHECK FOR ANOTHER ONE 



TEST5: 


SCOPE 






MOV 


#5,@DISPLAY 




JSR 


PC.CLRPAR 




TST 


NOKT 




BNE 


1$ 




JSR 


PC.NRALL 




JSR 


PC, MAPI 


1$: 


MOV 


#MPR0,R0 


L00P5: 


BIT 


#1 ,@R0 




BEO 


TST5 


LOPS: 


ADD 


/MO, RO 




CMP 


RO,#TREG 




BLO 


L00P5 




BR 


D0NE5 


TST5: 


JSR 


PC.LOCATM 



;EXIT WHE- ALL REGISTERS HAVE BEEN TESTED 
; LOCATE MEMORY CORRESPONDING TO THIS 



032701 000001 

001403 

104002 



000167 177744 
012770 000004 
011111 
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1105 
1 106 
1107 
1108 
1109 
1110 
1111 
1112 
1 1 13 
1 1 14 
1 115 

I 1 16 

II 17 
1 1 18 
1119 
1 120 
1 121 
1 122 
1123 
1 124 
1 125 
1 126 
1127 
1 128 
1 129 
1 130 
1131 
1 132 
1 133 
1 134 
1 135 
1 136 
1 137 
1 138 
1 139 
1 140 
1 141 
1 142 
1 143 
1 144 
1 145 
1 146 
1 147 
1 148 
1 149 
1 150 
1 151 
1 152 
1153 
1 154 
1 155 
1 156 
1 157 
1 158 
1159 
1 160 



003244 
003250 

003252 



003254 
003260 
003266 

003270 

003272 
003300 
003302 
003304 
003310 
003312 



003314 
003320 
003322 
003326 
003330 



003334 
003336 
003344 
003350 
003354 
003356 
003362 

003366 
003372 
003376 
003400 
003404 
003410 
003412 
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BIT 
BE? 
ERROR 



00571 1 
042770 
011111 
00571 1 
005770 
100401 
104002 



005070 000000 

000741 

005767 175222 

001002 

005037 177572 



104001 
01 2777 

004767 
005767 
001 C04 
004767 
004767 

01 2700 
032710 
0C1406 
062700 
020027 
103770 
000523 



000006 
010442 

175174 

010330 
010474 

000566 
000001 

000010 
000766 



000004 000000 



JMP 


LOPS 


MOV 


#WWP,@(RO) 


MOV 


@R1 ,<BR1 


TST 


§>R1 


BIC 


#WWP,@(R0) 


MOV 


@R1 ,@R1 


TST 


@R1 


TST 


@(R0) 


BMI 


.+4 


ERROR 





CLR 
BR 
D0NE5: TST 
BNE 
CLR 



@(R0) 

LOPS 
NOKT 
.+6 
@#SRO 



REGISTER- R1 WILL BE RETURNED CONTAINING 

THE ADDRESS OF THE FIRST LOCATION 

CONTROLLED BY THIS REGISTER (MAPPED 

THRU KERNEL PAGE 1 IF KT11 IS PRESENT) 

IS ERROR RETURN INDICATED? 

NO- BRANCH 

MAP INDICATES NO PARITY MEMORY IS 

CONTROLLED BY THIS REGISTER. RO 

POINTS TO THE ADDRESS OF THE 

PARITY REGISTER 

SET WWP IN THIS REGISTER 

WRITE CONTENTS OF LOCATION WITH 

WRONG PARITY 

DETECT WRONG PARITY 

CLEAR WWP IN PARITY REGISTER 

RESTORE GOOD PARITY 

REREAD LOCATION 

READ CONTENTS OF PARITY REGISTER 

BRANCH IF PARITY ERROR IS STILL SET 

PARITY ERROR BIT CLEARED BY READING 

GOOD PARITY (OR POSSIBLY WHILE DOING 

THE BIC TO CLEAR WWP). RO POINTS TO 

THE PARITY REGISTER ADDRESS. 

CLEAR THE PARITY REGISTER 



;TURN OFF KT1 1 IF PRESENT 



SHOW THAT PARITY GENERATE AND DETECT LOGIC WORKS CORRECTLY FOR EACH BYTE 
SHOW THAT WRITE WRONG PARITY WORKS FOR HIGH AND I OW BYTES 
SHOW THAT WRITING INTO LOCATION WHEN WRITE WRONG PARITY IS NOT SET 
RESTORES GOOD PARITY 



TES16: 



003414 004767 010506 



SCOPE 




MOV 


#6,@DISPLAY 


JSR 


%7,CLRPAR 


TST 


NOKT 


BNE 


1$ 


JSR 


%7,NRALL 


JSR 


%7,MAP1 


MOV 


#MPR0,R0 


BIT 


#1 ,@R0 


BEQ 


TST6 


ADD 


#1 0,R0 


CMP 


R0,#TREG 


BLO 


L00P6 


BR 


D0NE6 


JSR 


%7,L0CATM 



LOAD THE TEST NUMBER INTO THE DISPLAY 

CLEAR ALL PARITY REGISTERS 

KT11 PRESENT? 

NO, BRANCH 

YES- MAP IT (KERNEL TO BANK 0, RW; 

KERNEL 7 TO EXTERNAL BANK, RW; KERNEL 1 RW) 

AND TURN IT ON 

SETUP TO FIND REGISTERS PRESENT 

IS THIS REGISTER PRESENT? 

YES- BRANCH TO TEST IT 

NO- CHECK FOR ANOTHER ONE 



BRANCH TO DONE IF ALL REGISTERS 

HAVE BEEN TESTED 

LOCATE MEMORY CORRESPONDING TO 

THIS REGISTER- R1 SHOULD BE RETURNED 

CONTAINING THE ADDRESS OF THE FIRST 
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SEO 0022 



1 161 








1 162 








1163 


003420 


032701 


000001 


1 164 


003424 


001403 




1165 


003426 


104002 




1 166 








1 167 








1 168 








1 169 


003430 


000167 


177744 


1 170 








1 171 








1 172 








1 173 


003434 


00501 1 




1 174 


003436 


005070 


000000 


1 175 


003442 


005002 




1 176 








1 177 


003444 


1 1 021 1 




1 178 


003446 


00571 1 




1 179 


003450 


005770 


000000 


1 180 


003454 


100006 




1 181 


003456 


104002 




1182 








1 183 








1 184 








1 185 


003460 


005070 


000000 


1 186 


003464 


00501 1 




1 187 


003466 


005002 




1 188 


003470 


000402 




1 189 


003472 


105202 




1 190 


003474 


001363 




1191 


003476 


110261 


000001 


1 192 


003502 


00571 1 




1 193 


003504 


005770 


000000 


1 194 


003510 


100002 




1 195 


003512 


104002 




1 196 








1 197 








1 198 


003514 


000402 




1 199 


003516 


105202 




1200 


003520 


001366 




1201 








1202 








1203 








1204 


003522 


00501 1 




1205 


003524 


005002 




1206 


003526 


01 2770 


000004 


1207 


003534 


1 1021 1 




1208 


003536 


005070 


000000 


1209 








1210 


00.3542 


005711 




1211 


003544 


005770 


000000 


1212 


003550 


100402 




1213 


003552 


104002 




1214 








1215 








1216 









BIT 
BEO 
ERROR 



;FIRST SHOW THAT IF THE PARITY REGISTER 


;PARITY ERROR 


DOESN'T SET 


CLR 


@R1 


CLR 


@(R0) 


CLR 


R2 


1$: MOVB 


R2,@R1 


TST 


@R1 


TST 


@(R0) 


BPL 


5$ 



LOCATION CONTROLLED BY THIS REGISTER 

(VIRTUAL THRU KERNEL PAGE 1 IF KT11 PRESENT) 

IF NO MEMORY WAS FOUND TO CORRESPOND 

ODD ADDRESS IS RETURNED-BRANCH IF OK 

MAP INDICATES NO PARITY MEMORY IS 

CONTROLLED BY THIS REGISTER 

RO POINTS TO THE ADDRESS OF THE 

PARITY REGISTER 

AFTER ERROR, CHECK FOR NEXT REGISTER 

IS CLEARED INITIALLY, 

INITIALIZE LOCATION UNDER TEST 

INITIALLY CLEAR PARITY REGISTER 

R2 CONTA.NS VALUE TO BE LOADED 

INTO MEMORY 

WRITE VALUE INTO LOW BYTE 

READ WORD TO CHECK PARITY 

CHECK PARITY REGISTER 

BRANCH IF ERROR NOT SET 

PARITY ERROR SET WHEN VALUE IN R2 WAS 

WRITTEN AND READ BACK FROM LOW BYTE OF 

LOCATION WHOSE ADDRESS IS CONTAINED IN 

R1 (WWP WAS NOT SET) 

CLEAR ERROR BIT 

REINITIALIZE TEST LOCATION 

REINITIALIZE VALUE TO BE USED 

INCREMENT VALUE TO BE LOADED 

LOOP UNTIL ALL VALUES HAVE BEEN USED 

WRITE ALL VALUES INTO HIGH BYTE 

READ WORD TO CHECK PARITY 

CHECK PARITY REGISTER 

BRANCH IF ERROR NOT SET 

PARITY ERROR SET WHEN VALUE IN R2 

WAS WRITTEN AND READ BACK FROM HIGH BYTE 

OF LOCATION WHOSE ADDRESS IS CONTAINED 

IN R1 (WWP WAS NOT SET) 

INCREMENT VALUE TO BE LOADED 

LOOP UNTIL ALL VALUES HAVE BEEN USED 

;TEST PARITY GENERATE AND DETECT LOGIC BY SETTING WRITE WRONG PARITY AND 
;WRITING EACH POSSIBLE VALUE TO THE LOW BYTE, THEN TO THE HIGH BYTE 



5$: 
2$: 



CLR 


@(R0) 


CLR 


@R1 


CLR 


R2 


BR 


2$ 


INCB 


R2 


BNE 


1$ 


MOVB 


R2,1 ( 


TST 


@R1 


TST 


<a(RO) 


BPL 


.+6 


ERROR 




BR 


6$ 


INCB 


R2 


BNE 


2$ 



000000 3$: 



CLR 


@R1 


CLR 


R2 


MOV 


#WWP,@(RO) 


MOVB 


R2,@R1 


CLR 


@(R0) 


TST 


PR1 


TST 


@(R0) 


BMI 


.+6 


ERROR 





INITIALIZE LOCATION UNDER TEST 

INITIALIZE VALUE TO BE WRITTEN 

SET WRITE WRONG PARITY 

WRITE WRONG PARITY IN LOW BYTE 

CLEAR WRITE WRONG PARITY, AND CLEAR 

PARITY ERROR IF SET 

READ BACK WRONG PARITY 

PARITY ERROR SET? 

YES-BRANCH 

PARITY ERROR DID NOT SET WHEN THE 

LOCATION UNDER TEST WAS WRITTEN 

AND READ BACK WITH WR.TE WRONG PARITY 

SET. RO POINTS TO ADDRESS OF PARITY 
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) 



1217 














1218 














1219 














1220 














1221 


003554 


000402 






BR 


.+6 


1222 


003556 


105202 






INCB 


R2 


1223 


003560 


001362 






BNE 


3$ 


1224 


003562 


00501 1 






CLR 


PR1 


1225 


003564 


005070 


000000 




CLR 


@(R0) 


1226 


003570 


00571 1 






TST 


@>R1 


1227 














1228 


003572 


005770 


000000 




TST 


@(R0) 


1229 


003576 


100001 






BPL 


.+4 


1230 


003600 


104002 






ERROR 




1231 














1232 














1233 


003602 


012770 


000004 000000 4$: 


MOV 


#WWP,@(RO) 


1234 


003610 


1 1 0261 


000001 




MOVB 


R2.1 (R1 ) 


1235 
1236 
1237 


003614 


005070 


000000 




CLR 


@(R0) 


003620 


00571 1 






TST 


@>R1 


1238 


003622 


005770 


000000 




TST 


@(R0) 


1239 


003626 


100402 






BMI 


.+6 


1240 


003630 


104002 






ERROR 




1241 














1242 














1243 














1244 














1245 














1246 














1247 














1248 














1249 


003632 


000402 






BR 


.+6 


1250 


003634 


105202 






INCB 


R2 


1251 


003636 


001361 






BNE 


4$ 


1252 


003640 


00501 1 






CLR 


@R1 


1253 


003642 


005070 


000000 




CLR 


@(R0) 


1254 


003646 


00571 1 






TST 


@R1 


1255 














1256 


003650 


005770 


000000 




TST 


@(R0) 


1257 


003654 


100001 






BPL 


.+4 


1258 


003656 


104002 






ERROR 




1259 














1260 














1261 


003660 


000647 






BR 


L0P6 


1262 


003662 


005767 


174662 


DONE r 


TST 


NOKT 


1263 


003666 


001002 






BNE 


.+6 


1264 


003670 


005037 


177572 




CLR 


@#SRO 


1265 














1266 














1267 














1268 








;****>) 


********* 


************ 


1269 








;SHOW 


THAT SETTING PARITY E 


1270 








; ***** 


********* 


************ 


1271 


003674 


104001 




TEST7: 


SCOPE 




1272 


003676 


012777 


000007 175176 


MOV 


#7, ©DISPLAY 



REGISTER. R1 CONTAINS ADDRESS OF LOCATION 

BEING TESTED (VIRTUAL, THRU KERNEL 

PAGE 1 IF KT11 IS PRESENT). R2 

CONTAINS THE VALUE WRITTEN 

EXIT LOOP AFTER ERROR 

INCREMENT DATA 

LOOP TILL DONE WITH ALL VALUES 

REINITIALIZE ToCATION TO CLEAR BAD PARITY 

CLEAR ERROR IF SET 

READ LOCATION, WHICH SHOULD NOW HAVE 

GOOD PARITY 

PARITY ERROR SET? 

NO, BRANCH 

GOOD PARITY WAS NOT RESTORED BY 

WRITING INTO THE LOCATION WITH 

WRITE WRONG PARITY CLEARED 

SET WRITE WRONG PARITY 

WRITE WRONG PARITY IN HIGH BYTE 

CLEAR WRITE WRONG PARITY AND PARITY 

ERROR IF SET 

READ BACK WRONG PARITY 

PARITY ERROR SET? 

YES-BRANCH 

PARITY ERROR DID NOT SET WHEN THE LOCATION 

UNDER TEST WAS WRITTEN AND READ BACK WITH 

WRITE WRONG PARITY SET. RO POINTS 

TO THE ADDRESS OF THE PARITY REGISTER. 

THE VALUE IN R2 WAS WRITTEN INTO THE HIGH 

BYTE OF THE LOCATION WHOSE ADDRESS IS IN R1 

(VIRTUAL THRU KERNEL PAGE 1 IF KT11 PRESENT) 

THEN THE PARITY REGISTER WAS 

CLEARED AND THE WORD WAS READ BACK 

EXIT LOOP AFTER ERROR 

INCREMENT DATA 

LOOP TILL DONE WITH ALL VALUES 

CLEAR BAD PARITY IN TEST LOCATION 

CLEAR PARITY ERROR BIT IF SET 

READ LOCATION, WHICH SHOULD NOW 

HAVE GOOD PARITY, 

CHECK PARITY ERROR BIT 

BRANCH IF CLEAR 

WRITING INTO LOCATION WHEN WRITE 

WRONG PARITY WAS NOT SET DID NOT 

WRITE GOOD PARITY 

GO CHECK FOR ANOTHER PARITY REGISTER 



;TURN OFF KT11 IF PRESENT 



;LOAD THE TEST NUMBER INTO THE DISPLAY 
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lllllli 

lilllll 



1273 


003704 


004767 


010102 




1274 


003710 


012737 


004004 


000114 


1275 


003716 


005037 


0001 16 




1276 


003722 


012700 


000566 




1277 


003726 


032710 


000001 




1278 


003732 


001406 






1279 


003734 


062700 


000010 




1280 


003740 


020027 


000766 




1281 


003744 


103770 






1282 


003746 


000412 






1283 


003750 


012770 


000001 


000000 


1284 


003756 


052770 


100000 


000000 


1285 


003764 


000240 






1286 


003766 


005070 


000000 




1287 


003772 


000760 






1288 


003774 


012737 


000116 


0001 14 


1289 


004002 


000405 






1290 


004004 


104002 






1291 










1292 










1293 










1294 










1295 


004006 


022626 






1296 


004010 


005070 


000000 




1297 


004014 


000747 






1298 










1299 










1300 










1301 










1302 










1303 










1304 










1305 
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JSR 


%7,CLRPAR 


MOV 


#TRP7,(MPARVEC 


CLR 


@#PARVEC+2 


MOV 


#MPR0,R0 


BIT 


#1 ,@R0 


BE'. 


TST7 


ADD 


#10, RO 


CMP 


RO,,«TREG 


BLO 


LUP7 


BR 


D0NE7 


MOV 


#AE,@(R0) 


BIS 


#PERR,@(RO) 


NOP 




CLR 


@(R0) 


BR 


L00P7 


MOV 


#PARVEC+2.@#PARVEC 


BR 


TEST10 



CMP 
CLR 
BR 



(SP)+,(SP)+ 

@(R0) 

L00P7 



INITIALLY CLEAR ALL PARITY REGISTERS 
;SETUP PARITY TRAP RETURN 



;SETUP TO GET ADDRESS OF REGISTER PRESENT 
; BRANCH TO TEST REGISTER 



;BRANCH IF DONE TESTING ALL REGISTERS 

;SET ACTION ENABLE 
;SET PARITY ERROR 
; SHOULD NOT TRAP 
;CLEAR PARITY REGISTER 
;G0 CHECK NEXT REGISTER 



;TRAP OCCURRED WHEN PARITY ERROR BIT 
;WAS SET VIA A BIS INSTRUCTION 
;WITH ACTION ENABLE ALREADY SET. 
;R0 POINTS TO THE ADDRESS OF THE 
;PARITY REGISTER 
;RESTORE STACK POINTER 
;CLEAR PARITY REGISTER 



SHOW THAT REPEATED PARITY ERRORS WILL CAUSE REPEATED TRAPS IF ACTION 

ENABLE IS SET AND PARITY ERROR IS LEFT SET. 

SHOW THAT THE ERROR ADDRESS BITS (11-5) TRACK (ONLY FOR CORE PARITY REGISTERS) 



MFAFO 


MEMORY 


PARITY TEST 
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MFAF.P11 13-JAN-78 


12:13 










1306 
1307 


004016 
004020 


104001 
012777 


000010 


175054 


TEST10: 


SCOPE 

MOV 


#10, ©DISPLAY ; 


1308 


004026 


004767 


007760 






USR 


%7,CLRPAR '. 


1309 


004032 


005767 


174512 






TST 


NQKT '< 
1$ 


1310 


004036 


001004 








BNE 


1311 


004040 


004767 


007646 






JSR 


%7,NRALL °t 


1312 


004044 


004767 


010012 






JSR 


%7,MAP1 ; 


1313 
















1314 
1315 


004050 


012700 


000566 




1$: 


MOV 


0MPRO.RO 


1316 


004054 


012702 


000770 






MOV 


#INDC0 , R2 


1317 


004060 


032710 


000001 




LUP10: 


BIT 


#1 ,@R0 

TST10 ; 


1318 


004064 


001407 








BEO 


1319 


004066 


062700 


000010 




L0QP10: 


ADD 
TST 
CMP 


#1 0,R0 

(R2) + 

R0,#TREG 

LUP10 

DONE10 ; 

%7,L0CATM 


1320 
1321 


004072 
004074 


005722 
020027 


000766 






1322 
1323 
1324 


004100 
004102 
004104 


103767 
000507 
004767 


010016 




TST10: 


BLO 

BR 

JSR 


1325 


0041 10 


032701 


000001 






BIT 


#1 ,ri ; 


1326 


0041 14 


001403 








BEQ 


. + 10 » 


1327 


0041 16 


104002 








ERROR 




1328 
















1329 
















1330 
1331 


004120 


000167 


177742 






JMP 


LOOP10 


1332 
1333 
1334 


0041 24 
004132 
0041 34 


012770 
01 1 11 1 
016161 


000004 
004000 


000000 
004000 




MOV 
MOV 
MOV 


#WWP,(P(RO) ". 

@R1,@R1 

4000(R1 ) ,4000(R1 ) 


1335 
1336 


004142 
004150 


012770 
012737 


000001 
004202 


000000 
0001 14 




MOV 
MOV 


#AE,@>(RO) 
#TRP10,<MPARVEC 


1337 


004156 


012767 


000010 


000152 




MOV 


#1 .COUNT 


1338 
1339 


004164 


005711 






INST1: 


TST 


@R1 


1340 
1341 


004166 


104002 








ERROR 




1342 
















1343 
1344 
1345 


004170 
004172 


000441 
005761 


004000 




INST2: 


BR 
TST 


C0NT10 
4000(R1 ) 


1346 
1347 


004176 


104002 








ERROR 




1348 
















1349 
1350 


004200 


000435 








BR 


CONT10 


1351 


004202 


005367 


000130 




TRP10: 


DEC 


COUNT 
1$ 


1352 


004206 


001413 








BEO 


1353 


004210 


022712 


000001 






CMP 


#1 , (R2) 
2$ 


1354 


004214 


001005 








BNE 


1355 
1356 


004216 


032770 


000040 


000000 




BIT 


#BIT5,§>(R0) 


1357 
1358 


004224 


001401 








BEO 


• +4 


1359 


004226 


104002 








ERROR 




1360 
















1361 

















SEO 0025 



LOAD THE TEST NUMBER INTO THE DISPLAY 
INITIALLY CLEAR ALL PARITY REGISTERS 
KT11 PRESENT? 

BRANCH 
YES- INITIALLY MAP ALL PAGES NR 
MAP KERNEL TO BANK * RW 
KERNEL 7 TO THE EXTERNAL BANK, RW 
MAKE KERNE". PAGE 1 RW AND TURN ON THE KT11 



BRANCH TO TEST REGISTER IF PRESENT 



BRANCH IF ALL REGISTERS HAVE BEEN TESTED 

ERROR RETURN INDICATED? 

BRANCH IF NO 

MAP INDICATES THERE IS NO MEMORY 

CORRESPONDING TO THIS REGISTER 

RO POINTS TO THE ADDRESS OF 

THE PARITY REGISTER 

SET WRITE WRONG PARITY 
WRITE WRONG PARITY IN FIRST LOCATION 
WRITE WRONG PARITY IN SECOND LOCATION 
SET ACTION ENABLE AND CLEAR REST 
SETUP PARITY TRAP RETURN 
SETUP COUNTER TO EXECUTE INSTRUCTION 1 
( INST1 ) TEN TIMES 

READ WRONG PARITY WITH AE SET- SHOULD 
TRAP TO TRP10 

NO PARITY TRAP OCCURRED. RO POINTS TO 
;ADDRESS OF THE PARITY REGISTER BEING 
iTESTED. 

READ WRONG PARITY FROM SECOND ADDRESS 
WITH AE SET- SHOULD TRAP TO TRP10A 
NO PARITY TRAP OCCURRED. RO POINTS TO 
THE ADDRESS OF THE PARITY REGISTER 

BEING TESTED 

HAS PARITY TRAP OCCURRED TEN TIMES? 

YES- BRANCH 

IS THIS A CORE PAR REG? 

NO. BRANCH (NO ERROR 

ADDRESS BITS FOR MOS PAR 

IF ERROR ADDRESS BITS ARE TRACKING, 

BIT 5 SHOULD BE CLEAR (ONLY FOR CORE PARITY) 

PARITY ERROR ADDRESS BITS INCORkECT 
RO POINTS TO THE ADDRESS OF THE PARITY 
REGISTER. R1 CONTAINS THE ADDRESS 



CCMFAFO, MEMORY PARITY TEST 
CCMFAF.P11 13-JAN-78 12:13 



MACY11 30A(1052) 13-JAN-78 12:27 PAGE 26 



SEO 0026 



1362 

1363 

1364 

1365 

1366 

1367 

1368 

1369 

1370 

1371 

1372 

1373 

1374 

1375 

1376 

1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 

1385 

1386 

1387 

1388 

1389 

1390 

1391 

1392 

1393 

1394 

1395 

1396 

1397 

1398 

1399 

1400 

1401 

1402 

1403 

1404 

1405. 

1406' 

1407 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 



004230 
004234 
004236 
004244 

004250 
004252 
004256 
004260 



01 2716 
000002 
012737 
012716 
000002 
022712 
001005 
032770 



004252 
004172 



2$: 
000114 1$: 



000040 000000 



004266 001001 
004270 104002 



004272 

004274 
004302 
004306 
004310 
004314 
004320 
004322 
004326 
004330 
004334 
004336 



022626 
01 2737 
005070 
00551 1 
005561 
005070 
000662 
005767 
001002 
005037 
000401 
000000 



004340 
004342 
004350 
004354 
004360 
004362 
004366 

004372 
004376 
004402 
004406 
004410 
004414 

004416 
004422 
004424 



000116 
000000 



004000 
000000 



1$: 
000114 C0NT10: 



MOV 
RTI 
MOV 
MOV 
RTI 
CMP 
BNE 
BIT 

BNE 

ERROR 



CMP 

MOV 

CLR 

ADC 

ADC 

CLR 

BR 

TST 

BNE 

CLR 

BR 





#INST1 ,GSP 

#TRP10A,@#PARVEC 
#INST2,@SP 

#1 ,(R2) 

1$ 

#BIT5,@(R0) 



(SP)+,(SP)+ 

#PARVEC+2,@#PARVEC 

@(R0) 

@R1 

4000(R1 ) 

@(R0) 

LOOP10 

NOKT 

.+6 

@#SRO 

TEST11 



REFERENCED TO CAUSE A PARITY TRAP 
(VIRTUAL IF KT11 IS PRESENT) 
GO EXECUTE INSTRUCTION 1 AGAIN 

;CHANGE PARITY TRAP RETURN 
;G0 EXECUTE INSTRUCTION 2 

IS THIS A CORE REG? 

NO, BRANCH 

PARITY TRAP OCCURRED- CHECK PARITY 

ERROR ADDRESS BITS 

BRANCH IF OK (IF THE PARITY ERRC-3 

ADDRESS BITS TRACKED. BIT 5 WILL BE SET) 

PARITY ERROR ADDRESS BITS INCORRECT 

RO POINTS TO THE ADDRESS OF THE 

PARITY REGISTER. THE ADDRESS REFERENCED 

TO CAUSE THE ERROR WAS THAT IN 

R1 PLUS 4000 (OCTAL) . 

;RESTORE TRAPCATCHER 
;CLEAR PARITY REGISTER 
;CLEAR BAD PARITY 

-.CLEAR PARITY ERROR BIT IF SET 



;TURN OFF KT11 IF PRESENT 



IF MULTIPLE PARITY ERRORS OCCUR DURING ONE INSTRUCTION (WITH ACTION ENABLE 

JoT SET) THE ERROR ADDRESS BITS WILL RECORD THE LAST ERROR (ONLY FOR CORE PARITY 

REGISTERS) ^ ._ .*„*. *********** 



104001 
01 2777 
004767 
005767 
001004 
004767 
004767 

012700 
012703 
032710 
001003 
022713 
001407 



062700 000010 

005723 

020027 000766 



000011 
007436 
174170 

007324 
007470 

000566 
000770 
000001 



TEST11 : 


SCOPE 






MOV 


#11 .©DISPLAY 




JSR 


%7,CLRPAR 




TST 


NOKT 




BNE 


1$ 




JSR 


%7,NRALL 




JSR 


%7,MAP1 


1$: 


MOV 


*MPR0,R0 




MOV 


#INDC0,R3 


LUP11 : 


BIT 


#1 ,(3>R0 




BNE 


LOOP11 




CMP 


#1 ,(R3) 




BEO 


TST11 


LOOP M 


: ADD 


#10, RO 




TST 


(R3) + 




CMP 


R0,#TREG 



LOAD THE TEST NUMBER INTO THE DISPLAY 

INITIALLY CLEAR ALL PARITY REGISTERS 

KT11 PRESENT? 

NO- BRANCH 

YES, MAP KERNEL PAGE TO BANK , RW 

MAP KERNEL PAGE 7 TO THE EXTERNAL BANK. RW 

SET KERNEL PAGE 1 RW AND TURN ON KT11 

SETUP TO GET ADDRESSES OF REGISTERS PRESENT 



IF THIS REG NOT PRESENT. SKIP 

IS THIS A CORE PAR REG? 

YES, THEN TEST IT 

IF NOT CORE, SKIP THIS REGISTER 
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1418 
1419 
1420 
1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 
1440 
1441 
1442 
1443 
1444 
1445 
1446 
1447 
1448 
1449 
1450 
1451 
1452 
1453 
1454 
1455 
1456 
1457 
1458 
1459 
1460 
1461 
1462 
1463 
1464 
1465 
1466 
1467 
1468 
1469 
1470 
1471 
1472 
1473 



004430 
004432 
004434 

004440 
004444 
004446 



004450 
004454 
004456 
004462 
004470 
004472 
004474 
004500 

004502 
004506 
004510 



103764 
000443 
004767 

032701 
001403 
104002 



000167 
01 0102 
062702 
012770 
011111 
01 1212 
005070 
021112 

005770 
100401 
104002 



007466 
000001 



010000 
000004 



004520 
004522 



004524 
004530 
004532 
004534 
004540 
004542 
004546 
004550 



004554 
004556 
004564 
004570 
004574 
004576 
004602 



001001 
104002 



005070 
00551 1 
005512 
005070 
000726 
005767 
001002 
005037 



104001 
012777 
004767 
005767 
001004 
004767 
004767 



BLO 
BR 
TST11: JSR 

BIT 
BE, 
ERROR 



JMP 
MOV 
ADD 
MOV 
MOV 
MOV 
CLR 
CMP 



004512 032770 000100 000000 



TST 
BMI 
ERROR 



LUP11 

D0NE11 

%7,L0CATM 

#1 ,R1 
. + 10 



L00P11 
R1 ,R2 
#10000, R2 
0WWP,@(RO) 
@R1 ,@R1 
@R2,@>R2 
@(R0) 
@R1 ,@R2 

@(R0) 
.+4 



BIT #BIT6,@(R0) 



BNE .+4 
ERROR 



CLR 


@(R0) 


ADC 


@R1 


ADC 


@R2 


CLR 


@(R0) 


BR 


L00P11 


TST 


NOKT 


BNE 


.+6 


CLR 


@#SRO 



BRANCH OUT IF ALL REGISTERS HAVE BEEN TESTED 

GET THE ADDRESS OF A MEMORY LOCATION 

CORRESPONDING TO THIS PARITY REGISTER 

ERROR RETURN INDICATED? 

BRANCH IF NOT 

NO MEMORY IN MAP CORRESPONDING TO 

THIS PARITY REGISTER. RO POINTS 

TO THE ADDRESS OF THE PARITY REGISTER 

SETUP SECOND TEST ADDRESS LOCATION 

SET WRITE WRONG PARITY 

WRITE WRONG PARITY IN FIRST TEST LOCATION 

WRITE WRONG PARITY IN SECOND TEST LOCATION 

CLEAR PARITY REGISTER 

READ FIRST TEST LOCATION, AND 

THEN READ SECOND TEST LOCATION 

MAKE SURE PARITY ERROR SET 

PARITY ERROR NOT SET AFTER 
READING TWO LOCATIONS WHICH 
SHOULD HAVE BAD PARITY 
CHECK ERROR ADDRESS- IF THE LAST 
ADDRESS WAS RECORDED. BIT 6 WILL 
BE SET 

PARITY ERROR ADDRESS BITS INCORRECT 
RO POINTS TO ADDRESS OF PARITY REGISTER 
R2 CONTAINS ADDRESS OF LAST BAD PARITY 
LOCATION REFERENCED (IF KT11 PRESENT, 
ADDRESS IS VIRTUAL THRU KERNEL PAGE 1) 
CLEAR PARITY REGISTER 
CLEAR BA^ PARITY 

CLEAR PARITY ERROR BIT 



;TURN OFF KT11 IF PRESENT 



SHOW THAT IF AN INSTRUCTION DOING A DATIP GETS A PARITY ERROR, 
THE ORIGINAL DATA IS REWRITTEN IF ACTION ENABLE IS SET, AND IS 
ALTERRED IF ACTION ENABLE IS CLEAR 



TEST12: 



000012 
007222 
173754 

007110 
007254 



SCOPE 

MOV 

JSR 

TST 

BNE 

JSR 

JSR 



#12, ©DISPLAY 

%7,CLRPAR 

NOKT 

1$ 

%7,NRALL 

%7,MAP1 



;LOAD THE TEST NUMBER INTO THE DISPLAY 

;KT11 PRESENT? 

;N0- BRANCH 

;YES, MAP KERNEL TO BANK 0, RW 

;MAP KERNEL 7 TO THE EXTERNAL BANK, RW 

;SET KERNEL 1 RW AND TURN ON KT11 
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1474 


004606 


012700 


000566 


1$: 


MOV 


#MPRO,RO 


1475 


004612 


012702 


000770 




MOV 


0INDCO.R2 


1476 


004616 


032710 


000001 


LUP12: 


BIT 


#1 ,@R0 


1477 


004622 


001003 






BNE 


L00P12 


1478 


004624 


022712 


000001 




CMP 


#1 , (R2) 


1479 


004630 


001407 






BEO 


TST12 


1480 














1481 


004632 


062700 


000010 


L00P12: 


ADD 


#10, RO 


1482 


004636 


005722 






TST 


(R2) + 


1483 


004640 


020027 


000766 




CMP 


RO,#TREG 


1484 


004644 


103764 






BLO 


LUP12 


1485 


004646 


000474 






BR 


D0NE12 


1486 














1487 


004650 


004767 


007252 


TST12: 


JSR 


%7,L0CATM 


1488 














1489 


004654 


032701 


000001 




BIT 


#1 ,R1 


1490 


004660 


001403 






BEO 


. + 10 


1491 


004662 


104002 






ERROR 




1492 














1493 














1494 


004664 


000167 


177742 




JMP 


L00P12. 


1495 


004670 


012737 


004724 


0001 14 


MOV 


#TRP12,@#PARVEC 


1496 


004676 


012770 


000004 


000000 


MOV 


#WWP,@(RO) 


1497 


004704 


012711 


125252 




MOV 


#125252, @R1 


1498 


004710 


012770 


000001 


000000 


MOV 


#AE,@(RO) 


1499 














1500 


004716 


005211 






INC 


@R1 


1501 














1502 














1503 


004720 


104002 






ERROR 




1504 














1505 














1506 














1507 














1508 














1509 














1510 


004722 


000440 






BR 


C0NT12 


1511 


004724 


005070 


000000 


TRP12: 


CLR 


@(R0) 


1512 


004730 


021127 


125252 




CMP 


@R1 ,#125252 


1513 


004734 


001401 






BEO 


.+4 


1514 


004736 


104002 






ERROR 




1515 














1516 














1517 














1518 














1519 














1520 


004740 


005770 


000000 




TST 


@(R0) 


1521 


004744 


100401 






BMI 


.+4 


1522 


004746 


104002 






ERROR 




1523 














1524 














1525 














1526 


004750 


022626 






CMP 


(SP)+,(SP)+ 


1527 


004752 


012770 


000004 


000000 


MOV 


#WWP,@(RO) 


1528 














1529 


004760 


012711 


125252 




MOV 


#125252, @R1 



SEQ 0028 

; SETUP TO GET ADDRESSES OF REGISTERS PRESENT 



;SKIP, IF THIS REG NOT PRESENT 
;REG PRESENT, IS IT CORE? 
;YES, DO* THIS TEST 
;SKIP, IF THIS REG IS NOT CORE 



BRANCH TO DONE IF ALL REGISTERS 

HAVE BEEN TESTED 

LOCATE MEMORY CORRESPONDING TO THIS 

REGISTER 

ERROR RETURN INDICATED? 

NO- BRANCH 

NO MEMORY IN MAP CORRESPONDING TO 

THIS REGISTER. RO POINTS TO 

THE ADDRESS OF THE PARITY REGISTER 

SET UP PARITY TRAP RETURN 

SET WRITE WRONG PARITY 

WRITE WRONG PARITY IN TEST LOCATION 

SET ACTION ENABLE AND CLEAR 

WRITE WRONG PARITY 

DO DATIP. DATO WITH ACTION ENABLE 

SET- SHOULD ABORT ON DATIP AND 

RESTORE ORIGINAL DATA 

NO ABORT OCCURRED ON READING LOCATION 

WHICH SHOULD CONTAIN BAD PARITY 

(WITH AE SET) . 

RO POINTS TO ADDRESS OF PARITY REGISTER. 

R1 CONTAINS ADDRESS OF TEST LOCATION 

(VIRTUAL THRU KERNEL PAGE 1 IF KT11 IS 

PRESENT) 

PARITY TRAP OCCURRED- CLEAR PARITY REGISTER 

ORIGINAL DATA RESTORED? 

YES, BRANCH 

NO- DATIP WHICH GOT A PARITY ERROR 

TRAP ALTERRED CONTENTS OF LOCATION 

READ. ADDRESS OF TEST LOCATION IS IN R1 

(IF KT11 IS PRESENT, ADDRESS IN R1 

IS VIRTUAL THRU KERNEL PAGE 1) 

RO POINTS TO ADDRESS OF PARITY REGISTER 

MAKE SURE PARITY ERROR SET WHEN 

DATA WAS REREAD IN THE ABOVE CMP 

DATIP WHICH GOT A PARITY ERROR TRAP 

ALTERRED THE PARITY OF THE LOCATION READ 

R1 CONTAINS ADDRESS OF TEST LOCATION 

(VIRTUAL THRU KERNEL 1 IF KT11 PRESENT) 

RESTORE STACK POINTER 

SET WRITE WRONG PARITY AND CLEAR 

PARITY ERROR 

REWRITE DATA WITH WRONG PARITY 
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1530 
1531 
1532 

1533 
1534 
1535 
1536 
1537 
1538 
1539 
1540 
1541 
1542 
1543 
1544 
1545 
1546 
1547 
1548 
1549 
1550 
1551 
1552 
1553 
1554 
1555 
1556 
1557 
1558 
1559 
1560 
1561 
1562 
1563 
1564 
1565 
1566 
1567 
1568 
1569 
1570 
1571 
1572 
1573 
1574 
1575 
1576 
1577 
1578 
1579 
1580 
1581 
1582 
1583 
1584 
1585 



004764 005070 000000 

004770 012737 000116 

004776 005211 

005000 005070 000000 

005004 022711 125253 

005010 001401 

005012 104002 



005014 005770 000000 
005020 100001 
005022 104002 



005024 005070 000000 

005030 005011 

005032 005070 000000 

005036 000675 

005040 012737 000116 

005046 005767 173476 

005052 001002 

005054 005037 177572 



005060 
005062 
005070 
005074 
0051 00 
005102 
0051 06 

0051 12 
0051 16 
005122 

0051 24 
0051 30 
005134 
005136 



104001 
01 2777 
004767 
005767 
001004 
004767 
004767 



000013 
006716 
173450 

006604 
006750 



012700 000566 
032710 000001 
001406 

062700 000010 
020027 000766 
103770 
000470 
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CLR 

000114 MOV 

INC 


@(R0) 

#PARVEC+2.@#PARVEC 

@>R1 


CLR 
CMP 
BEO 
ERROR 


@(R0) 

#125253, *R1 
.+4 



TST 
BPL 
ERROR 





C0NT12: 


CLR 


@(R0) 






CLR 


@R1 






CLR 


@(R0) 






BR 


L00P12 


0001 14 


D0NE12: 


MOV 


#PARVEC+2,@#PARVEC 






TST 


NOKT 






BNE 


.+6 






CLR 


@#SRO 



;CLEAR PARITY REGISTER 

;REST0RE TRAPCATCHER 
;SINCE AE IS CLEAR, INSTRUCTION SHOULD 
;COMPLETE AND SHOULD CLEAR BAD PARITY 
;CLEAR PARITY ERROR BIT 
;CHECK DATA 

;DATIP, DATO TO A LOCATION CONTAINING BAD 
;PARITY WITHOUT AE SET LEFT INCORRECT 
;DATA. RO POINTS TO THE ADDRESS OF 
;THE PARITY REGISTER. R1 CONTAINS THE 
;ADDRESS OF THE TEST LOCATION (V.RTUAL 
;THRU KERNEL PAGE 1 IF KT11 IS PRESENT) 
;CHECK PARITY ERROR BIT 

DATIP, DATO WITH AE CLEAR DID 

NOT CLEAR BAD PARITY IN LOCATION 

ADDRESSED. RO POINTS TO THE ADDRESS 

OF THE PARITY REGISTER. R1 CONTAINS 

THE ADDRESS OF THE TEST LOCATION 

(VIRTUAL THRU KERNEL PAGE 1 IF KT11 

IS PRESENT) 

CLEAR PARITY REGISTER 

CLEAR LOCATION TO RESTORE GOOD PARITY 

CLEAR PARITY ERROR IF SET 

GO CHECK FOR ANOTHER PARITY 

REGISTER 

;RESTORE TRAPCATCHER 



;TURN OFF KT11 IF PRESENT 



SHOW THAT IF AN INSTRUCTION DOING A DATI (BUT NO DATO TO THE SAME LOCATION) 
GETS A PARITY ERROR, THE ORIGINAL DATA IS UNALTERRED, WHETHER OR NOT ACTION 
ENABLE IS SET 



TEST13: SCOPE 
MOV 
JSR 
TST 
BNE 
JSR 
JSR 



1$: 
LUP13: 



MOV 
BIT 
BEO 

ADD 
CMP 
BLO 



#13,@DISPLAY 

%7,CLRPAR 

NOKT 

1$ 

%7,NRALL 

%7,MAP1 

#MPRO ,R0 
#1 .(PRO 
TST13 

#10, RO 
RO,#TREG 
LUP13 
D0NE13 



; LOAD THE TEST NUMBER INTO THE DISPLAY 

KT11 PRESENT? 

NO- BRANCH 

YES, MAP KERNEL TO BANK 0, KERNEL 

7 TO THE EXTERNAL BANK, AND KERNEL 

0, 1 .AND 7 RW 

SETUP TO GET ADDRESSES OF REGISTERS PRESENT 

IF THIS REGISTER IS PRESENT, GO 

TEST IT 



;BRANCH I/ ALL REGISTERS HAVE BEEN 

;TESTED 
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1586 


005140 


004767 


006762 


TST13: JSR 


%7,L0CATM ; 


1587 














1588 














1589 


005144 


032701 


000001 




BIT 


#1,R1 ; 


1590 


005150 


001403 






BEO 


. + 10 ; 


1591 


005152 


104002 






ER~OR 




1592 














1593 














1594 














1595 


005154 


000167 


177744 




JMP 


L00P13 


1596 


005160 


01 2737 


005214 


0001 14 


MOV 


#TRP13,@#PARVEC ; 


1597 


005166 


012770 


000004 


000000 


MOV 


#WWP,@(RO) ; 


1598 


0051 74 


01271 1 


125252 




MOV 


#125252, @R1 ; 


1599 
1600 
1601 


005200 


01 2770 


000001 


000000 


MOV 


#AE,@(RO) ; 


005206 


00571 1 






TST 


@R1 J 


1602 














1603 


005210 


104002 






ERROR 




1604 














1605 














1606 














1607 














1608 














1609 


005212 


000434 






BR 


C0NT13 


1610 


005214 


005070 


000000 


TRP13: CLR 


©(RO) ; 


1611 


005220 


021 127 


125252 




CMP 


@R1 ,#125252 ; 


1612 


005224 


001401 






BEO 


.+4 ; 


1613 


005226 


104002 






ERROR 




1614 














1615 














1616 












; 


1617 














1618 












; 


1619 












; 


1620 


005230 


005770 


000000 




TST 


©(RO) ; 


1621 


005234 


100401 






BMI 


• +4 ; 


1622 


005236 


104002 






ERROR 


; 


1623 












; 


1624 














1625 












; 


1626 












; ( 


1627 












; 


1628 


005240 


022626 






CMP 


(SP)+,(SP)+ ; 


1629 


005242 


012770 


000004 


000000 


MOV 


#WWP,@(R0) ;. 


1630 


005250 


012711 


125252 




MOV 


#125252, @R1 ;F 


1631 


005254 


005070 


000000 




CLR 


©(RO) ;( 


1632 


005260 


01 2737 


000116 


0001 14 


MOV 


#PARVEC+2.@#PARVEC 


1633 


005266 


005711 






TST 


@R1 ;£ 


1634 












; ; 


1635 


005270 


005070 


000000 




CLR 


@(R0) ;C 


1636 


005274 


022711 


125252 




CMP 


#125252, @>R1 ;( 


1637 


005300 


001401 






BEO 


.+4 


1638 


005302 


104002 






ERROR 


; c 


1639 












; v 


1640 












; f 


1641 












: L 



; LOCATE MEMORY CORRESPONDING TO THIS 
;REGISTER, AND IF KT11 IS PRESENT 
;MAP KERNEL 1 TO THAT MEMORY 
;ERROR RETURN INDICATED? 
;N0- BRANCH 

;MAP INDICATES NO MEMORY WAS FOUND 
;CORRESPONDING TO THIS REGISTER 
;R0 POINTS TO THE ADDRESS OF THE 
;PARITY REGISTER 

;SETUP PARITY TRAP RETURN 

;SET WRITE WRONG PARITY 

;WRITE WRONG PARITY 

;SET ACTION ENABLE AND CLEAR 

;WRITE WRONG PARITY 

;DATI WITH ACTION ENABLE SET SHOULD 

:ABORT LEAVING DATA UNCHANGED 

NO ABORT ON READING BAD PARITY 
:W1TH ACTION ENABLE SET. RO POINTS 

TO THE ADDRESS OF THE PARITY REGISTER. 

R1 CONTAINS THE ADDRESS OF THE TEST 

LOCATION (VIRTUAL THRU KERNEL PAGE 

1 IF KT11 IS PRESENT). 

ABORT OCCURRED AS EXPECTED- CLEAR REGISTER 

ORIGINAL DATA RESTORED? 

YES, BRANCH 

DATI WHICH GOT A PARITY ERROR ALTERRED 

THE CONTENTS OF THE LOCATION ADDRESSED. 

(R1 CONTAINS THE ADDRESS OF 

MEMORY BEING TESTED- IF KT11 IS 

PRESENT, ADDRESS IN R1 IS VIRTUAL) 

RO POINTS TO THE ADDRESS OF THE 

PARITY RFGISTER 

CHECK PAkITY REGISTER 

BRANCH IF PARITY ERROR SET 

PARITY ERROR NOT SET AFTER READING 

DATA WITH BAD PARITY 

RO POINTS TO THE ADDRESS OF THE PARITY 

REGISTER. R1 CONTAINS THE ADDRESS 

0" THE TEST LOCATION (VIRTUAL THRU 

KERNEL PAGE 1 IF KT11 PRESENT) 

RESTORE STACK POINTER 

SET WRITE WRONG PARITY, CLEAR PARITY ERROR 

REWRITE DATA WITH WRONG PARITY 

CLEAR PARITY REGISTER 

;RESTORE TRAPCATCHER 
DATI TO LOCATION WITH BAD PARITY 
AE NOT SET-INSTRUCTION SHOULD COMPLETE 
CLEAR PARITY ERROR BIT 
CHECK DATA 

DATI TO LOCATION WITH BAD PARITY 
WITHOUT ACTION ENABLE SET LEFT INCORRECT DATA 
R1 CONTAINS THE ADDRESS OF THE TEST 
LOCATION (VIRTUAL THRU KERNEL PAGE 1 
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1642 
















1643 
















1644 


005304 


005070 


000000 


CQNT13: 


CLR 


P(RO) 


1645 


005310 


005011 








CLR 


@R1 


1646 


005312 


005070 


000000 






CLR 


@(R0) 


1647 


005316 


000702 








BR 


L00P13 


1648 
















1649 


005320 


012737 


0001 16 


000114 D0NE13: 


MOV 


#PARVEC+2,@#PARVEC 


1650 


005326 


005767 


173216 






TST 


NOKT 


1651 


005332 


001002 








BNE 


.+6 


1652 


005334 


005037 


177572 






CLR 


(»#SRO 


1653 
















1654 
















1655 
















1656 










****** 


******* 


********************* 


1657 










CHECK 


PARITY 


MEMORY WITH SERIES OF 


1658 










ENABLE 


PARITY 


TRAP 


1659 










****** 


******* 


********************* 


1660 


005340 


104001 




TEST14: 


SCOPE 




1661 


005342 


012777 


000014 


173532 




MOV 


#14,@DISPLAY 


1662 


005350 


005067 


01 1 102 






CLR 


IMAX 


1663 


005354 


004767 


006432 






JSR 


PC.CLRPAR 


1664 


005360 


012737 


005734 


0001 14 




MOV 


#TRP14,<a#PARVEC 


1665 


005366 


022767 


000002 


173474 




CMP 


#2,PMEML 


1666 


005374 


103402 








BLO 


.+6 


1667 


005376 


004767 


005742 






JSR 


PC.SMLSYS 


1668 


005402 


032767 


000002 


1731 10 




BIT 


#2,BITPT 


1669 


005410 


001007 








BNE 


1$ 


1670 


005412 


012767 


000004 


173100 




MOV 


#4,BITPT 


1671 


005420 


01 2767 


040000 


173070 




VIOV 


#40000, ADRPT 


1672 


005426 


000403 








BR 


L00P14 


1673 


005430 


012767 


020000 


173060 


1$: 


MOV 


#20000, ADRPT 


1674 


005436 


036767 


173056 


173424 L00P14: 


BIT 


BITPT.PMEML 


1675 


005444 


001021 








BNE 


TST14 


1676 


005446 


032767 


000002 


173044 


LUP14: 


BIT 


#2,BITPT 


1677 


005454 


001001 








BNE 


EX 


1678 


005456 


000402 








BR 


.+6 


1679 


005460 


000167 


000776 




EX: 


JMP 


TEST16 


1680 


005464 


062767 


020000 


173024 




ADD 


#20000, ADRPT 


1681 


005472 


0C6367 


173022 






ASL 


BITPT 


1682 


C05476 


022767 


000200 


173014 




CMP 


#200,BITPT 


1683 


005504 


003354 








BGT 


L00P14 


1684 
















1685 


005506 


000443 








BR 


D0NE14 


1686 


005510 


012704 


001036 


TST14: 


MOV 


#PARPAT,R4 


1687 


005514 


016767 


172776 


173006 




MOV 


ADRPT, HIADR 


1688 


005522 


062767 


020000 


173000 




ADu 


#20000, HIADR 


1689 


005530 


016705 


172762 






MOV 


ADRPT, R5 


1690 


005534 


005025 




2$: 


CLR 


(5)f 


1691 


005536 


020567 


172766 






CMP 


R5, HIADR 


1692 


005542 


103774 








BLO 


2$ 


1693 


005544 


012701 


000566 






MOV 


#MPR0,R1 


1694 


005550 


032711 


000001 


3S: 


BIT 


#1 ,@R1 


1695 


005554 


C01003 








BNE 


.+10 


1696 


005556 


012771 


000001 


000000 




MOV 


#AE,@(R1) 


1697 


005564 


062701 


000010 






ADD 


#10, R1 



;IF KT11 IS PRESENT). RO POINTS TO THE 

;ADDRESS OF THE PARTIY REGISTER. 

;CLEAR PARITY REGISTER 

;CLEAR LOCATION 

JCLEAR PARITY ERROR IF SET 

;G0 CHECK FOR ANOTHER PARITY 

;REGISTER 

;RESTORE TRAPCATCHER 



;TURN OFF KT11 IF PRESENT 



PATTERNS FROM 4K TO 28K 



LOAD THE TEST NUMBER INTO THE DISPLAY 

DON'T ITERATE THE REST OF THE SUBTESTS 

CLEAR ALL PARITY REGISTERS 

SETUP PARITY TRAP RETURN 

TEST FOR AN BK SYSTEM 

SYST > 8K 

SYST < OR = 8K 

TEST BANK INDICATOR FOR BANK 1 

; INITIALIZE BANK INDICATOR TO BANK 2 
; INITIALIZE MEMORY STARTING ADDRESS 

; INITIALIZE BANK INDICATOR TO BA> K 1 

;DOES THIS 4K HAVE PARITY? 

;YES, TEST IT 

;TEST FOR BANK 1 INDICATOR IF SET GO TO TEST 16 



NO- UPDATE MEMORY ADDRESS 

UPDATE BIT POINTER 

THIS 28K DONE? 

NO. BRANCH TO SEE IF NEXT 4K 

SHOULD BE TESTED 

YES, EXIT 

INITIALIZE PATTERN POINTER 

SET UPPER LIMIT FOR THIS 4K 



; INITIALLY CLEAR CORE BLOCK UNDER TEST 
INITIALIZE TO SET AE IN ALL REGISTERS 
;SET ACTION ENABLE IF REGISTER IS PRESENT 
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1698 


005570 


020127 


000766 




1699 


005574 


103765 






1700 


005576 


004767 


000024 




1701 










1702 


005602 


005724 






1703 


005604 


005714 






1704 


005606 


001373 






1705 


005610 


004767 


006176 


mSk, 


1706 


005614 


000714 




lillll 


1707 


005616 


012737 


000116 


mmkii 


1708 


005624 


000473 




"****'" 


1709 
1710 
171 1 










1712 


005626 


016705 


172664 




1713 










1714 


005632 


01 1415 






1715 


005634 


01 1567 


172676 




1716 


005640 


021467 


172672 




1717 


005644 


001401 






1718 


005646 


104002 






1719 










1720 










1721 


005650 


005725 






1722 


005652 


020567 


172652 




1723 


005656 


103765 






1724 


005660 


005067 


173102 




1725 










1726 


005664 


012701 


000566 


t 


1727 


005670 


03271 1 


000001 




1728 


005674 


001003 






1729 


005676 


005771 


000000 




1730 


005702 


100406 






1731 


005704 


062701 


000010 




1732 


005710 


020127 


000766 


* 


1733 


005714 


103765 






1734 


005716 


000207 






1735 


005720 


01 1 167 


173042 




1736 


005724 


104004 






1737 










1738 










1739 










1740 


005726 


004767 


006562 




1741 










1742 










1743 


005732 


000207 






1744 










1745 










1746 


005734 


005067 


173026 




1747 


005740 


012701 


000566 




1748 


005744 


032711 


000001 




17*9 


005750 


001003 






1750 


005752 


005771 


000000 




1751 


005756 


100407 






1752 


005760 


062701 


000010 




1753 


005764 


020127 


000766 



000114 D0NE14: 



13- 
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CMP 


R1 ,#TREG 


BLO 


3$ 


JSR 


%7,TPC0RE 


TST 


(4) + 


TST 


(4) 


BNE 


4$ 


JSR 


PC.CLRPAR 


BR 


LUP14 


MOV 


#PARVEC+2.@#PARVEC 


BR 


TEST15 



;ROUTINE TO WRITE AND CHECK EACH 
;IN ADRPT) WITH VALUE POINTED TO 
TPCORE: MOV ADRPT, R5 



MOV 


(4), (5) 


MOV 


(5), WAS 


CMP 


(4) .WAS 


BEO 


.+4 


ERROR 




TST 


(5) + 


CMP 


R5, HIADR 


BLH 


1$ 


CLK 


TREG 


MOV 


#MPR0,R1 


BIT 


#1.(1) 


BNE 


. + 10 


TST 


@(R1 ) 


BMI 


3$ 


ADD 


#10, R1 


CMP 


R1 ,#TREG 


BLO 


2$ 


RTS 


%7 


MOV 


@R1 ,TREG 


ERRORS 





GO TO ROUTINE TO EXERCISE THIS 4K 

WITH THE CURRENT PATTERN 

UPDATE PATTERN 

LAST PATTERN? 

NO. LOOP 

YES, CLEAR ALL PARITY REGISTERS 

UPDATE AND CHECK NEXT 4K 

;RESTORE TRAP CATCHER 
GO TO NEXT TEST 



LOCATION IN 4K (STARTING AT ADDRESS 
BY R4 

SETUP R5 TO ADDRESS MEMORY 

LOCATION BEING CHECKED 

WRITE PATTERN INTO MEMORY 

READ TEST LOCATION 

DATA OK? 

YES- BRANCH 

DATA INCORRECT IN LOCATION WHOSE 

ADDRESS IS IN R5. R4 POINTS TO THE 

DATA WRITTEN. 

UPDATE ADDRESS POINTER 

THIS 4K DONE? 

NO. BRANCH TO TEST NEXT LOCATION 

YES, DID ANY PARITY ERRORS OCCUR 

WITHOUT TRAPPING? 



JSR %7,PSCAN 
RTS %7 



;YES- BRANCH 



;N0, RETURN 

;STORE ADDRESS OF REGISTER GETTING ERROR 

;PARITY ERROR SET (WITH AE SET) AND 

;N0 TRAP OCCURRED. TREG CONTAINS 

;ADDRESS OF PARITY REGISTER WHICH 

;HAS ERROR BIT SET. 

;SCAN FOR PARITY ERRORS AND PRINT 

;18 BIT ADDRESSES OF THOSE FOUND. 

;AFTER REPORTING EACH ERROR CLEAR IT 



;PARITY TRAP SERVICE (NO TRAPS TO 114 SHOULD OCCUR IN THIS SUBTEST) 

TRP14: CLR TREG 

MOV #MPR0,R1 ;FIND PARITY REGISTER INDICATING PARITY ERROR 

1$: BIT #1,(R1) , 

BNE .+10 

TST <a(R1) 

BMI 2$ ;BRANCH IF PARITY ERROR SET 

ADD #10, R1 

CMP R1,#TREG 



CCMFAFO, MEMORY PARITY TEST 
CCMFAF.P11 13-JAN-78 12:13 



MACY1T 30A(1052) 13-JAN-78 12:27 PAGE 33 



1754 


005770 


103765 








BLO 


1$ 


1755 


005772 


104002 








ERROR 


; 


1756 


005774 


000405 








BR 


3$ ; 


1757 
















1758 


005776 


01 1 167 


172764 


2S: 


MOV 


@R1,TREG I 


1759 


006002 


104004 








ERRORS 


; 


1760 
















1761 














; 


1762 
















1763 














; 


1764 


006004 


004767 


006504 






JSR 


%7,PSCAN ; 


1765 














; 


1766 


006010 


022626 




3$: 


CMP 


(SP)+,(SP)+ ; 


1767 


006012 


000207 








RTS 


%7 ; 


1768 














; 


1769 
















1770 
















1771 
















1772 










****** 


******** 


************************* i= 


1773 










CHECK 


PARITY MEMORY WITH SERIES OF PATTE 


1774 










ENABLE 


PARITY 


ERROR TRAPPING 


1775 










****** 


******** 


************************** 


1776 


006014 


104001 




TEST15: 


SCOPE 




1777 


006016 


012777 


000015 


173056 




MOV 


#15, ©DISPLAY ; 


1778 


006024 


005767 


172520 






TST 


NOKT ; 


1779 


006030 


001402 








BEO 


.+6 ; 


1780 


006032 


000167 


000424 






JMP 


TEST16 ; 


1781 


006036 


004767 


005750 






JSR 


PC.CLRPAR ; 


1782 


006042 


004767 


005644 






JSR 


%7,NRALL ; 


1783 


006046 


004767 


006010 






JSR 


%7,MAP1 ; 


1784 
















1785 


006052 


012777 


001600 


173172 




MOV 


#1600,@KPAR1 


1786 


006060 


005067 


172470 






CLR 


LOWFLG ; 


1787 


006064 


016767 


173000 


173002 




MOV 


PMEML.PMEMX 


1788 


006072 


012737 


006402 


0001 14 




MOV 


#TRP15,@#PARVEC ; 


1789 


0061 00 


012767 


000200 


172412 




MOV 


#200,BIT.PT ; 


1790 


006106 


036767 


172406 


172760 


.00P15: 


BIT 


BITPT, PMEMX ; 


1791 


0061 14 


001022 








BNE 


TST15 ; 


1792 


0061 16 


062777 


000200 


173126 


>0P15: 


ADD 


#200,<b>KPAR1 ; 


1793 


006124 


006367 


172370 






ASL 


BITPT ; 


1794 


0061 30 


103366 








BCC 


LOOP 15 


1795 


006132 


005767 


172416 






TST 


LOWFLG 


1796 


006136 


001051 








BNE 


D0NE15 ; 


1797 


006140 


005267 


172410 






INC 


LOWFLG ; 


1798 


006144 


016767 


172722 


172722 




MOV 


PMEMH.PMEMX ; 


1799 


006152 


012767 


000001 


172340 




MOV 


#1, BITPT ; 


1800 


006160 


000752 








BR 


L00P15 ; 


1801 


0061 62 


01 2704 


001036 


TST15: 


MOV 


#PARPAT,R4 ; 


1802 


006166 


012767 


020000 


172322 




MOV 


#20000, ADRPT ; 


1803 
















1804 


006174 


012705 


020000 






MOV 


#20000, R5 


1805 


006200 


005025 




2$: 


CLR 


(5) + 


1806 


006202 


020527 


040000 






CMP 


R5, #40000 


1807 


006206 


103774 








BLO 


2$ 


1808 


006210 


012701 


000566 






MOV 


#MPR0,R1 ; 


1809 

















PARITY TRAP TO 114 OCCURRED DURING 

TEST 14 BUT NO REGISTERS HAVE 

PARITY ERROR SET 

STORE ADDRESS OF REGISTER GETTING ERROR 

PARITY TRAP TO 114 OCCURRED DUE TO 

PARITY ERROR WHILE EXERCISING MEMORY 

R1 POINTS TO THE ADDRESS OF THE 

PARITY REGISTER HAVING PARITY ERROR 

BIT SET 

SCAN FOR BAD PARITY AND TYPE 18 BIT ADDRESSES 

OF LOCATIONS FOUND BAD 

RESTORE STACK POINTER 

RETURN (FROM JSR TO TPCORE) TO 

CHECK NEXT PATTERN 



LOAD THE TEST NUMBER INTO THE DISPLAY 

KT11 PRESENT? 

YES~ BRANCH 

NO, SKIP TEST 

CLEAR ALL PARITY REGISTERS 

MAP KERNEL TO BANK , RW 

MAP KERNEL 7 TO THE EXTERNAL BANK 

SET KERNEL 1 RW AND TURN ON KT11 

MAP KERNEL PAGE 1 TO BEGINNING OF 28-32K 

CLEAR FLAG TO INDICATE CHECKING LOVER 64K 

SETUP PARITY TRAP RETURN 

INITIALIZE BIT POINTER 

DOES THIS 4K HAVE PARITY? 

YES, BRANCH TO TEST IT 

N0~ MAP TO NEXT 4K 

UPDATE BIT POINTER 

BRANCH IF NOT DONE WITH 64K 

DONE WITH 128K? 

YES, BRANCH 

NO. SET FLAG INDICATING UPPER 64K 

SETUP PARITY MAP WORD 

SETUP BIT POINTER FOR UPPER 64K 

CONTINUE 

INITIALIZE PATTERN POINTER 

INITIALIZE VIRTUAL ADDRESS OF MEMORY 

BEING TESTED 

INITIALLY CLEAR CORE BLOCK UNDEk TEST 



INITIALIZE TO SET ACTION ENABLE IN ALL 
PARITY REGISTERS 



i| 

IIIIIP 
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1810 
1811 
1812 
1813 
1814 
1815 
1816 
1817 
1818 
1819 
1820 
1821 
1822 
1823 
1824 
1825 
1826 
1827 
1828 
1829 
1830 
1831 
1832 
1833 
1834 
1835 
1836 
1837 
1838 
1839 
1840 
1841 
1842 
1843 
1844 
1845 
1846 
1847 
1848 
1849 
1850 
1851 
1852 
1853 
1854 
1855 
1856 
1857 
1858 
1859 
1860 



1E 



31 



006214 
006220 
006222 

006230 

006234 
006240 
006242 
006246 
006250 
006252 
006254 
006260 
006262 
006266 
006274 



006276 
006300 

006304 
006306 
006312 
006316 
006320 



006322 
006324 
006330 
006332 

006336 
006342 
006346 
006350 
006354 
006356 
006362 
006366 
006370 
006372 
006376 



032711 000001 

001003 

012771 000001 



062701 
020127 
103765 
004767 
005724 
005714 
001373 
004767 
000716 
005037 
01 2737 
000472 



000240 
012705 

01 1415 
01 1567 
021467 
001401 
104002 



005725 
020527 
103765 
005067 

012701 
032711 
001003 
005771 
100406 
062701 
020127 
103765 
000207 
01 1167 
104004 



000010 
000766 



177572 
000116 



172224 
172220 



040000 
172430 



000566 
000001 



000010 
000766 



006400 000207 



BIT 

BNE 
MOV 

ADD 

CMP 

BLO 

JSR 

TST 

TST 

BNE 

JSR 

BR 

CLR 

MOV 

BR 



#1 ,@R1 
. + 10 
#AE,@(R1 ) 

#10, R1 

R1 ,#TREG 

3$ 

%7,TPC0RX 

(4) + 

(4) 

4$ 

PC.CLRPAR 

L0P15 

@#SRO 

#PARVEC+2.@#PARVEC 

TEST16 



;PARITY MEMORY TEST ROUTINE USING KT11 
;WRITES AND CHECKS EACH LOCATION IN 4K 
TPCORX: NOP 

MOV #20000, R5 

1$: 



MOV 


(4) 


(5) 


MOV 


(5) 


WAS 


CMP 


(4) 


,WAS 


BEO 


.+4 




ERROR 







TST 


(5) + 


CMP 


R5, #40000 


BLO 


1$ 


CLR 


TREG 


MOV 


#MPR0,R1 


BIT 


#1,(1) 


BNE 


. + 10 


TST 


<a(R1) 


BMI 


3$ 


ADD 


#10, R1 


CMP 


R1 ,#TREG 


BLO 


2$ 


RTS 


%7 


MOV 


@R1 ,TREG 


ERRORS 





RTS 



%7 



;SET ACTION ENABLE IF THIS REGISTER 
;IS PRESENT 



;EXERCISE THIS 4K 

;UPDATE PATTERN 

;LAST PATTERN? 

;N0. LOOP 

;YES, CLEAR ALL PARITY REGISTERS 

'.UPDATE AND CHECK NEXT 4K 

;TURN OFF KT11 WHEN DONE 

;:ZSTORE TRAPCATCHER 
;G0 TO NEXT TEST 

AND TESTING MEMORY ABOVE 28K 

USING KERNEL PAGE 1 MAPPED TO CURRENT BANK 

SETUP R5 TO POINT TO THE L0CA1 ION 

UNDER TEST (VIRTUAL ADDRESS) 

WRITE PATTERN 

READ TEST LOCATION 

DATA OK? 

YES- BRANCH 

NO- DATA INCORRECT IN LOCATION WHOSE 

VIRTUAL ADDRESS IS IN R1 (GOES THRU 

KERNEL PAGE 1). R4 POINTS TO 

THE VALUE WRITTEN. 

UPDATE ADDRESS POINTER 

THIS 4K DONE? 

NO, BRANCH TO TEST NEXT LOCATION 

YES, CHECK TO SEE IF ANY PARITY 

ERRORS OCCURRED WITHOUT TRAPPING 

IS THIS PARITY REGISTER PRESENT? 

NO, GET NEXT ONE 

YES- DID ERROR SET? 

YES- BRANCH 

NO- GET NEXT REGISTER 



;N0 ERRORS- EXIT 

;STORE ADDRESS OF REGISTER GETTING ERROR 

;PARITY ERROR SET (AE ALREADY SET) 

;AND NO TRAP OR TIMEOUT OCCURRED 

;R1 POINTS TO THE ADDRESS OF THE 

-.PARITY REGISTER 



1862 
1863 
1864 
1865 



006402 
006406 
006412 
006416 



005067 
012701 
03271 1 
001003 



172360 
000566 
000001 



;PARITY TRAP SERVICE (NO TRAPS TO 114 SHOULD OCCUR IN THIS SUBTEST) 
TRP15: CLR TREG 

MOV #MPR0,R1 ; LOCATE PARITY REGISTER INDICATING ERROR 

1$: BIT #1,(R1) 

BNE .+10 
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1866 
1867 
1868 
1869 
1870 
1871 
1872 
1873 
1874 
1875 
1876 
1877 
1878 
1879 
1880 
1881 
1882 
1883 
1884 
1865 
1886 
1887 
1888 
1889 
1890 
1891 
1892 
1893 
1894 
1895 
1896 
1897 
1898 
1899 
1900 
1901 
1902 
1903 
1904 
1905 
1906 
1907 
1908 
1909 
1910 
1911 
1912 
1913 
1914 
1915 
1916 
1917 
1918 
1919 
1920 
1921 



006420 
006424 
006426 
006432 
006436 
006440 



005771 
100407 
062701 
020127 
103765 
104002 



000010 
000766 



006442 000405 
006444 011167 
006450 104004 



006452 004767 006036 



006456 022626 
006460 000207 



006462 
006464 
006472 
006500 
006506 
006510 
006516 
006524 
006526 
006534 
006542 
006544 
006552 
006554 
006556 
006562 
006570 
006574 
006602 
006604 
006606 
006614 
006622 
006626 
006632 
006634 



104001 
012777 
012737 
032767 
001007 
012767 
012767 
000403 
012767 
036767 
001021 
032767 
001001 
000402 
000167 
062767 
006367 
022767 
003354 
000421 
016767 
062767 
004767 
016705 
005025 
020567 



000016 
007076 
000002 

000004 
040000 

020000 
171760 



001546 
020000 
171724 
000200 



171704 
020000 
005164 
171664 

171670 



172410 
0001 14 
172012 

172002 
171772 

171762 
172326 



171726 
171716 



171714 
171706 
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TST 0(R1) 




BMI 2$ 




ADD #10, R1 




CMP R1,#TREG 




BLO 1$ 




ERROR 




BR 3$ 




MOV @R1,TREG 




ERRORS 





SEQ 0035 



jBRANCH IF PARITY ERROR IS SET 



JSR %7,PSCAN 



CMP (SP)+,(SP) 
RTS %7 



;TRAP TO 114 OCCURRED DURING TEST 15 BUT 
;N0 PARITY REGISTERS HAVE PARITY ERROR SET 

;STORE ADDRESS OF REGISTER GETTING ERROR 

'.PARITY TRAP TO 114 OCCURRED DUE TO 

jPARITY ERROR WHILE EXERCISING MEMORY 

;"TREG" CONTAINS ADDRESS OF PARI*. Y REGISTER 

;HAVING PARITY ERROR BIT SET 

;SCAN MEMORY FOR BAD PARITY AND PRINT 18 

;BIT ADDRESSES OF LOCATIONS FOUND 

ICLEAR BAD PARITY IN EACH AFTER 

;REPORTING IT 

;RESTORE STACK POINTER 

;RETURN (FROM JSR TO TPCORX) TO 

;TEST NEXf PATTERN 



FORCE WRONG PARITY IN EACH BYTE OF PARITY MEMORY FROM 4K TO 28K 
WRITE WRONG PARITY AND READ IT BACK WITH ACTION ENABLE SET, MAKING 
SURE THAT A TRAP OCCURS. THEN WRITE GOOD PARITY AND MAKE SURE THAT 
NO TRAP OCCURS WHEN IT IS READ. MAKE SURE THAT THE ERROR ADDRESS BITS 
(PARITY REGISTER BITS 5-11) ARE CORRECT. 



********** 



TEST16: 



LUP16 
1$: 



000002 171746 2$: 



SCOPE 

MOV 

MOV 

BIT 

BNE 

MOV 

MOV 

BR 

MOV 

BIT 

BNE 

BIT 

BNE 

BR 

JMP 

ADD 

ASL 

CMP 

BGT 

BR 

MOV 

ADD 

JSR 

MOV 

CLR 

CMP 



#16,@DISPLAY 

#TRP16,@#PARVEC 

#2,BITPT 

LUP16 

#4,BITPT 

#40000, ADRPT 

. + 10 

#20000, ADRPT 

BITPT.PMEML 

3$ 

#2,BITPT 

.+4 

.+6 

OUT 

#20000, ADRPT 

BITPT 

#200,BITPT 

1$ 

D0NE16 

ADRPT.HIADR 

#20000, HIADR 

%7,CLRPAR 

ADRPT.R5 

(5) + 

R5, HIADR 



;LOAD THE TEST NUMBER INTO THE DISPLAY 

;SET UP TRAP RETURN 

;TEST BANK INDICATOR FOR BANK 1 

;INIT POINTER TO BANK 2 



;DOES THIS 4K HAVE PARITY? 

;YES, BRANCH TO TEST IT 

JTEST FOR BANK 1 INDICATOR IF SET GO OUT 



;NO, UPDATE MEMORY ADDRESS BY 4K 

;UPDATE BIT POINTER 

;THIS 28K DONE? 

;NO. CHECK NEXT 4K 

;YES, EXIT 

;SET UPPER LIMIT THIS 4K 

;CLEAR ALL PARITY REGISTERS 

; CLEAR BA.'.K UNDER TEST 
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1922 

1923 

1924 

1925 

1926 

1927 

1928 

1929 

1930 

1931 

1932 

1933 

1934 

1935 

1936 

1937 

1938 

1939 

1940 

1941 

1942 

1943 

1944 

1945 

1946 

1947 

1948 

1949 

1950 

1951 

1952 

1953 

1954 

1955 

1956 

1957 

1958 

1359 

1960 

1961 

1962 

1963 

1964 

1965 

1966 

1967 

1968 

1969 

1970 

1971 

1972 

1973 

1974 

1975 

1976 

1977 



006640 
006642 
006646 
006650 
006654 
006662 



006666 
006672 
006676 
006704 
006710 
006714 
006720 
006722 



006730 
006734 
006740 
006742 
006746 
006750 
006754 
006760 
006764 
006766 
006774 
007000 
007004 
007006 
007012 
007014 

007020 
007022 
007030 
007032 



103774 
004767 
000736 
004767 
012737 
000167 



016705 
005067 
012767 
012715 
012701 
032711 
001003 
012771 



062701 
020127 
103765 
005767 
100425 
112715 
012701 
03271 1 
001003 
042771 
062701 
020127 
103765 
005767 
100407 
142715 



005136 
000116 
000472 



171624 
171660 
125253 
125253 
000566 
000001 
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BLO 


5$ 


6$: JSR 


%7,WWP16 


BR 


2$ 


D0NE16: JSR 


%7,CLRPAR 


000114 MOV 


#PARVEC+2,@#PARVEC 


M" 


TEST17 



SEQ 0036 



;GO WRITE WRONG PARITY IN EACH BYTE 

JUPDATE AND CHECK NEXT 4K 

;CLEAR ALL PARITY REGISTERS IF DONE 

;RESTORE TRAP CATCHER 
;GO TO NEXT TEST 



;WRITE WRONG PARITY TEST ROUT 
;USING SAME DATA VALUE, WRITE 
;AND THEN IN CORRECT STATE TO 



000005 000000 



000010 
000766 



000253 
000566 
000001 

000004 
000010 
000766 

171544 

000377 



000407 

112765 000252 

000751 

142765 000377 



007040 012701 000566 



007044 
007050 
007052 
007060 
007064 
007070 
007072 



032711 
001003 
042771 
062701 
020127 
103765 
104002 



000005 
000010 
000766 



000001 2$: 

000001 6$: 

3$: 

4$: 

000000 



MOV 
CLR 
MOV 
MOV 
MOV 
BIT 
BNE 
MOV 



ADD 

CMP 

BLO 

TST 

BMI 

MOVB 

MOV 

BIT 

BNE 

BIC 

ADD 

CMP 

BLO 

TST 

BMI 

BICB 

BR 

MOVB 
BR 
BICB 

MOV 

BIT 
BNE 
BIC 
ADD 
CMP 
BLO 
ERROR 



ADRPT.R5 
ODDFLG 

#125253, SHDBE 
#1 25253, @R5 
#MPR0,R1 
#1,(1) 
. + 10 
#WWP+AE,@(R1) 



#10, R1 

R1 ,#TREG 

1$ 

ODDFLG 

2$ 

#253,@>R5 

#MPR0,R1 

#1,(1) 

. + 10 

#WWP,@(R1 ) 

#10, R1 

R1 ,#TREG 

5$+4 

ODDFLG 

6$ 

#377, @R5. 

3$ 

#252,1(R5) 

5$ 

#377,1 (R5) 

0MPRO.R1 

#1 ,@R1 

.+10 

#WWP+AE,§>(R1 ) 

#10, R1 

R1 ,#TREG 

4$ 



INE - TESTS EACH BYTE IN 4K 
S AND CHECKS PARITY IN WRONG STATE 
PROVE THAT PARITY BITS TOGGLE 

;SET TEST ADDRESS POINTER 

INDICATE TESTING LOW BYTE 

{STORE DATA FOR USE BY ERROR TYPFOUT ROUTINE 

INITIALIZE TEST LOCATION 

;SETUP TO LOAD PARITY REGISTERS 



;SET WRITE WRONG PARITY AND ACTION 
;ENABLE IF THIS PARITY REGISTER 
;IS PRESENT 



IWRITING HIGH BYTE? 

;YES, BRANCH 

;N0. WRITE WRONG PARITY IN LOW BYTE 

;THIS CODE CLEARS WWP BIT IN ALL 

;PARITY REGISTERS 



;TESTING HIGH OR LOW BYTE? 

;BRANCH,Ir HIGH BYTE 

;DETECT WRONG PARITY WITH DATIP- 

;SHOULD TRAP TO TRP16 BEFORE DOING THE DATOB 

;WRITE WRONG PARITY IN HIGH BYTE 

;DETECT WRONG PARITY WITH DATIP- 

;SHOULD TRAP TO TRP16 BEFORE DOING THE DATOB 

;N0 TRAP OCCURRED- SETUP TO CLEAR 

;AE AND WWP 



;CLEAR AE AND WWP IN ALL PARITY REGISTERS 



;ERROR, NO TRAP AFTER WRITING AND 
-.READING WRONG PARITY IN LOCATION 
;WHOSE ADDRESS IS IN R5 (AE AND WWP 
;WERE SET IN ALL PARITY REGISTERS) 
;TESTING LOW BYTE IF ODDFLG IS POSITIVE 
;TESTING HIGH BYTE IF ODDFLG IS NEGATIVE 
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1978 












1979 












1980 


007074 


000517 




BR 


CN16 


1981 












1982 








;WHEN WRONG PARITY DATA IS R 


1983 


007076 


012701 


000566 


TRP1P-: MOV 


#MPR0,R1 


1984 


007102 


03271 1 


000001 


TRP16A: BIT 


#1 ,@R1 


1985 


007106 


001003 




BNE 


. + 10 


1986 


0071 10 


042771 


000005 000000 BIC 


#AE+WWP,@(R1 


1987 


0071 16 


062701 


000010 


ADD 


#10, R1 


1988 


007122 


020127 


000766 


CMP 


R1 ,#TREG 


1989 


007126 


103765 




BLO 


TRP16A 


1990 


007130 


012701 


000566 


MOV 


#MPRO, R1 


1991 


0071 34 


01 2703 


000770 t 


MOV 


#INDC0,R3 


1992 


007140 


005067 


171622 


CLR 


TREG 


1993 


007144 


03271 1 


000001 


1$: BIT 


#1 ,@R1 


1994 


007150 


001017 




BNE 


2$ 


1995 


007152 


005771 


000000 


TST 


@(R1 ) 


1996 


007156 


100014 




BPL 


2$ 


1997 


007160 


005767 


171602 


TST 


TREG 


1998 


007164 


001401 




BEO 


.+4 


1999 


007166 


104002 




ERROR 




2000 












2001 












2002 


007170 


036761 


171324 000002 BIT 


BITPT,2(R1 ) 


2003 












2004 


007176 


001001 




BNE 


.+4 


2005 


007200 


104002 




ERROR 




2006 












2007 












2008 












2009 












2010 


007202 


01 0304 




MOV 


R3.R4 


201 1 


007204 


01 1 167 


171556 


MOV 


<PR1 ,TREG 


2012 


007210 


062701 


000010 


2$: ADD 


#10, R1 


2013 


007214 


005723 




TST 


(R3) + 


2014 


007216 


020127 


000766 


CMP 


R1 ,#TREG 


2015 


007222 


103750 




BLO 


1$ 


2016 












2017 


007224 


01 1567 


171306 


MOV 


(5) ,WAS 


2018 


007230 


022715 


125253 


CMP 


#125253, @R5 


2019 


007234 


001401 




BEO 


.+4 


2020 


007236 


104003 




ERRORP 




2021 












2022 












2023 












2024 












2025 












2026 












2027 


007240 


005767 


171522 


TST 


TREG 


2028 


007244 


001002 




BNE 


3$ 


2029 


007246 


104002 




ERROR 




2030 












2031 












2032 












2033 













;NOTE THAT AE AND WWP WERE CLEARED 
;BEFQRE TYPING THE ERROR PRINTOUT 



BACK SHOULD ENTER HERE VIA TRAP TO 114 

; PARITY TRAP OCCURRED- FIRST CLEAR 
;WWP AND AE IN ALL REGISTERS 



;FIND THE REGISTER THAT SENSED THE ERROR 



;DOES THIS CONTROL EXIST? 

;N0, BRANCH 

;YES- IS ERROR SET? 

;N0. BRANCH 

;YES- WAS IT SET IN ANY OTHER REGISTER ALSO? 

;N0- BRANCH 

;ERROR SET IN MORE THAN ONE PARITY REGISTER 

-.AFTER WRITING WRONG PARITY IN LOCATION 

;WHOSE ADDRESS IS IN R5 

;DOES MAP INDICATE THIS PARITY REGISTER 

;CONTROLS THIS MEMORY? 

;YES, BRANCH 

; PARITY REGISTER RESPONDED TO MEMORY 

;NOT INCLUDED IN ITS MAP 

;PARITY REGISTER'S ADDRESS IS POINTED 

; TO BY R1 . ADDRESS OF LOCATION CAUSING 

;PARITY ERROR IS IN R5 

;STORE REGISTER ADDRESS 



;BRANCH UNTIL ALL THE PARITY 

; REGISTERS HAVE BEEN CHECKED 

;SAVE DATA FROM LOCATION UNDER TEST 

;D1D BICB CHANGE DATA? 

;N0. CONTINUE 

;DATA WAS MODIFIED BY THE BICB WHICH 

;GOT A PARITY ERROR TRAP- SINCE PARITY ERROR 

;TRAP OCCURRED. CONTENTS SHOULD NOT HAVE 

;BEEN MODIFIED. R5 CONTAINS ADDRESS 

;0F TEST LOCATION. "TREG" CONTAINS 

;ADDRESS OF PARITY REGISTER SENSING 

; ERROR 

;WAS PARITY ERROR SET IN ANY REGISTERS? 

;YES- BRANCH 

;PARITY TRAP OCCURRED ON READING 

;WRONG PARITY (WITH AE SET) BUT NO 

REGISTERS HAD PARITY ERROR BIT SET. 

;R5 CONTAINS THE ADDRESS OF THE 

;TEST LOCATION. 
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2034 
2035 
2036 
2037 
2038 
2039 
2040 
2041 
2042 
2043 
2044 
2045 
2046 
2047 
2048 
2049 
2050 
2051 
2052 
2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
2062 
2063 
2064 
2065 
2066 
2067 
2068 
2069 
2070 
2071 
2072 
2073 
2074 
2075 
2076 
2077 
2078 
2079 
2080 
2081 
2082 
2083 
2084 
2085 
2086 
2087 
2088 
2089 



007250 
0C7252 
007256 
007260 
007264 
007270 
007272 
007276 
007300 
007302 
007304 
007306 
007310 



007312 
007314 
007316 
007322 
007324 
007330 
007332 



007334 
007340 
007342 
007344 
007350 
007352 
007354 



007360 

007362 
007366 
007374 
007402 
007406 
007410 
007414 
007420 
007426 



000420 
022714 
001015 
01 7701 
042701 
010502 
042702 
000302 
006302 
006302 
020102 
001401 
104003 



022626 
01 1515 
005077 
005715 
005777 
100001 
104002 



005167 
100401 
005725 
020567 
103401 
000207 
000167 



171502 
170037 



104001 
004767 
012777 
012777 
005767 
001402 
000167 
004767 
012737 
012767 



005032 
000017 
000017 
171142 

000636 
004372 
007762 
000200 



BR 


4$ 


CMP 


#1 , (R4) 


BNE 


4$ 


MOV 


@TREG,R1 


BIC 


#170037, R1 


MOV 


R5.R2 


BIC 


#3777, R2 


SWAB 


R2 


ASL 


R2 


ASL 


R2 


CMP 


R1 ,R2 


BEO 


.+4 


ERRORP 





4$: 


CMP 


(SP)+, (SP 


CNT16: 


MOV 


(5), (5) 




CLR 


@TREG 




TST 


@R5 




TST 


@TREG 




BPL 


.+4 



;GET PARITY REGISTER CONTENTS 
;MASK OFF ALL BUT ERROR ADDRESS BITS 
;GET ADDRESS OF LOCATION UNDER TEST 
;POSITION BITS IN R2 



;PARITY ERROR ADDRESS BITS CORRECT? 

ERROR ADDRESS BITS (PARITY REGISTER 

BITS 11-5) ARE INCORRECT. R5 CONTAINS 

THE ADDRESS OF THE TEST LOCATION. 

"TREG" CONTAINS THE ADDRESS OF THE 

PARITY REGISTER DETECTING THE ERROR 

RESTORE STACK POINTER 

RESTORE TEST LOCATION TO FIX BAD PARITY 

CLEAR ERROR BIT IN PARITY REGISTER 

READ LOCATION TO SEE IF PARITY IS GOOD 

IS PARITY ERROR SET? 

NO- BRANCH 

WRITING LOCATION WITH WRITE WRONG PARITY 

CLEAR DIDN'T CLEAR BAD PARITY 

R5 CONTAINS ADDRESS OF THE TEST 

LOCATION. "TREG" CONTAINS THE ADDRESS 

OF THE PARITY REGISTER DETECTING 

THE ERROR 

TOGGLE BYTE INDICATOR 

BRANCH IF READY TO TEST HIGH BYTE 

UPDATE ADDRESS POINTER 

THIS 4K DONE? 

NO. TEST NEXT LOCATION 

RETURN TO TEST NEXT BANK 



FORCE WRONG PARITY IN EACH BYTE OF PARITY MEMORY ABOVE 28K 

WRITE WRONG PARITY AND READ IT WITH ACTION ENABLE SET. MAKING SURE 

THAT A TRAP OCCURS. THEN WRITE AND READ THE SAME LOCATION WITH GOOD PARITY 

(USING SAME DATA) TO SHOW THAT THE PARITY BIT TOGGLES. MAKE SURE THAT 

THE ERROR ADDRESS BITS (PARITY REGISTER BITS 5-11) ARE CORRECT. 



COM 


ODDFLG 


BMI 


.+4 


TST 


(5) + 


CMP 


R5.HIADR 


BLO 


1$ 


RTS 


%7 


JMP 


WWP16A 



TEST17: 



171506 
171500 



0001 14 
171064 



SCOPE 

JSR 

MOV 

MOV 

TST 

BEO 

UMP 

JSR 

MOV 

MOV 



PC.RSTLDR 

#17,@DISPLAY 

#17, ©DISPLAY 

NOKT 

.+6 

XFR1 

PC.CLRPAR 

#TRP17,@#PARVEC 

#200,BITPT 



;LOAD THE TEST NUMBER INTO THE DISPLAY 

;KT11 PRESENT? 

;YES, BRANCH 

;N0, SKIP TO NEXT TEST 

;CLEAR ALL PARITY REGISTERS 

;SETUP FG.\ PARITY TRAP 

;INITIALIZE 4K BIT POINTER 
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2090 

2091 

2092 

2093 

2094 

2095 

2096 

2097 

2098 

2099 

2100 

2101 

2102 

2103 

2104 

2105 

2106 

2107 

2108 

2109 

21 10 

21 1 1 

2112 

21 13 

2114 

21 15 

21 16 

21 17 

21 18 

21 19 

2120 

2121 

2122 

2123 

2124 

2125 

2126 

2127 

2128 

2129 

2130 

2131 

2132 

2133 

2134 

2135 

2136 

2137 

2138 

2139 

2140 

2141 

2142 

2143 

2144 

2145 



007434 
007440 



007444 

007452 
007456 
007464 
007472 
007500 
007502 
007510 
007514 
007516 
007522 
007524 
007530 
007536 
007544 
007552 
007554 
007560 
007562 
007566 
007570 
007574 
007576 
007602 
007610 



007614 
007620 
007624 
007632 
007636 
007642 
007646 
007650 

007656 
007662 
007666 
007670 
007674 
007676 
007702 

007706 
007710 
007716 

007724 

007730 
007734 
007736 



004767 004252 
004767 004416 



012777 

005067 
016767 
012767 
036767 
001025 
062777 
006367 
103366 
005767 
001025 
005267 
01 6767 
012767 
01 2767 
000747 
012705 
005025 
020527 
103774 
0C4767 
000742 
005037 
012737 
000167 



012705 
005067 
012767 
012715 
01 2701 
03271 1 
001003 
012771 

062701 
020127 
103765 
0C5767 
100405 
1 12715 
142715 



001600 171600 

171076 

171406 171410 

000002 000366 

171022 171374 1$: 



000200 171542 
171004 

171032 

171024 

171336 171336 

000001 170754 

000004 000306 

020000 

040000 

000020 

177572 

000116 000114 

000436 



020000 

170732 

125253 170702 

125253 

000566 

000001 

000005 000000 



000010 
000766 



000253 
000377 



000406 

112765 000252 000001 

142765 000377 000001 

012701 000566 

0o2711 000001 

001003 

042771 000005 000000 



2$: 



3$: 
5$: 



6$: 
DQNE17: 



JSR 
USR 



MOV 

MOV 

MOV 

BIT 

BNE 

ADD 

ASL 

BCC 

TST 

BNE 

INC 

MOV 

MOV 

MOV 

BR 

MOV 

CLR 

CMP 

BLO 

JSR 

BR 

CLR 

MOV 

JMP 



%7,NRALL 
%7,MAP1 



#1600,@KPAR1 

LOWFLG 

PMEML.PMEMX 

#2,.!NDX17 

BITPT, PMEMX 

3$ 

#200,@KPAR1 

BITPT 

1$ 

LOWFLG 

D0NE17 

LOWFLG 

PMEMH, PMEMX 

#1 , BITPT 

#4,INDX17 

1$ 

#20000, R5 

(5) + 

R5, #40000 

5$ 

%7,WWP17 

2$ 

@#SRO 

#PARVEC+2,@#PARVEC 

XFR1 



; INITIALIZE ALL PAGES TO NON-RESIDENT 

;MAP KERNEL TO BANK O.RW; KERNEL 7 

;T0 THE EXTERNAL BANK, RW. TURN ON 

;THE KT11 AND MAKE KERNEL 1 RW 

; INITIALIZE KERNEL PAGE 1 TO 28K 

;CLEAR FLAG TO INDICATE TESTING LOWER 64K 

;SETUP OFFSET TO CHECK LOWER 64K OF MAPS 

;DOES THIS 4K HAVE PARITY? 

;YES, BRANCH TO TEST IT 

;N0. MAP TO NEXT 4K 

;UPDATE BIT POINTER 

;G0 CHECK TO SEE IF THIS 4K HAS PARITY 

;END OF 128K? 

;YES, EXIT 

;N0. SET FLAG TO INDICATE SHIFT TO 

;HIGH 64K AND CHANGE MAPS 

;SETUP OFFSET TO CHECK UPPER 64K OF MAPS 



;CLEAR BANK UNDER TEST 



;G0 WRITE WRONG PARITY AND CHECK IT 
;UPDATE AND CHECK NEXT 4K 
;TURN OFF KT11 WHEN DONE 

;RESTORE TRAP CATCHER 
;G0 TO SETUP FOR NEXT TEST 



;WRITE WRONG PARITY TEST ROUTINE 



MOV 
CLR 
MOV 
MOV 
MOV 
BIT 
BNE 
MOV 

ADD 
CMP 
BLO 
TST 

BMI 

MOVB 

BICB 



#20000, R5 

ODDFLG 

#125253, SHDBE 

#125253, @R5 

#MPR0,R1. 

#1,(1) 

.+10 

#WWP+AE.@(R1 ) 

#10, R1 
R1 ,#TREG 
1$ 

ODDFLG 
2$ 

#253, @R5 
#377, @R5 



BR 3$ 

MOVB #252,1 (R5) 

BICB #377,1(R5) 



3$: 


MOV 


#MPR0,R1 


4$: 


BIT 


#1 ,@R1 




BNE 


.+10 




BIC 


#AE+WWP,@(R1 ) 



TO TEST MEMORY ABOVE 28K 

;SET TEST ADDRESS POINTER 

;CLEAR FLAG TO INDICATE TESTING LOW BYTE 

;STORE DATA FOR USE BY ERROR TYPEOUT ROUTINE 

; INITIALISE LOCATION 

INITIALIZE REGISTER ADDRESS POINTER 

;DOES THIS CONTROL EXIST? 

;N0. GET NEXT 

;YES- SET WRITE WRONG PARITY 

;AND ACTION ENABLE 

;ALL REGISTERS SETUP? 

;N0- LOOP 

;YES- TESTING HIGH BYTE? 

;YES, BRANCH 

;N0, WRITE WRONG PARITY IN LOW BYTE 

;DETECT WRONG PARITY WITH DAT I P- 

ISHOULD TRAP TO TRP17 BEFORE DOING THE DATOB 

;WRITE WRONG PARITY IN HIGH BYTE 

;DETECT WRONG PARITY WITH DATIP 

; SHOULD TRAP TO TRP17 BEFORE DOING THE DATOB 

;IF NO TRAP, CLEAR AE AND WWP IN ALL 

;PARITY REGISTERS 
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SEQ 0040 



smm, 

) 



2146 


007744 


062701 


000010 


ADD 


#10, R1 


2147 


007750 


020127 


000766 


CMP 


R1 ,#TREG 


2148 


007754 


103765 




BLO 


4$ 


2149 


007756 


104002 




ERROR 




2150 












2151 












2152 












2153 












2154 












2155 












2156 












2157 


007760 


000512 




BR 


CNT17 


2158 












2159 








;WHEN WRONG PARITY DATA IS RE 


2160 


007762 


012701 


000566 


TRP17: MOV 


#MPRO, R1 


2161 


007766 


03271 1 


000001 


TRP17A: BIT 


#1 ,@R1 


2162 


007772 


001003 




BNE 


.+10 


2163 


007774 


042771 


000005 000000 BIC 


#AE+WWP,@(R1 ) 


2164 


010002 


062701 


000010 


ADD 


#10, R1 


2165 


010006 


020127 


000766 


CMP 


R1 ,#TREG 


2166 


010012 


103765 




BLO 


TRP17A 


2167 


010014 


012701 


000566 


MOV 


#MPR0,R1 


2168 


010020 


01 2703 


000770 


MOV 


#INDC0,R3 


2169 


010024 


005067 


170736 


CLR 


TREG 


2170 


010030 


032711 


000001 


1$: BIT 


#1 ,@R1 


2171 


010034 


001017 




BNE 


2$ 


2172 


010036 


005771 


000000 


TST 


@(R1 ) 


2173 


010042 


100014 




BPL 


2$ 


2174 


010044 


005767 


170716 


TST 


TREG 


2175 


010050 


001401 




BEQ 


.+4 


2176 


010052 


104002 




ERROR 




2177 












2178 












2179 


010054 


036761 


170440 000002 BIT 


BITPT, 2(R1) 


2180 












2181 




010060 




INDX17= 


.-2 


2182 


010062 


001001 




BNE 


.+4 


2183 


010064 


104002 




ERROR 




2184 












2185 












2186 












2187 












2188 












2189 


010066 


01 1 167 


170674 


MOV 


@R1 ,TREG 


2190 


010072 


01 0304 




MOV 


R3.R4 


2191 


010074 


062701 


000010 


2$: ADH 


#10, R1 


2192 


010100 


005723 




TST 


(R3) + 


2193 


010102 


020127 


000766 


CMP 


R1 ,#TREG 


2194 


010106 


103750 




BLO 


1$ 


2195 












2196 


010110 


01 1567 


170422 


MOV 


(5) ,WAS 


2197 


0101 14 


022715 


125253 


CMP 


#125253, @R5 


2198 


010120 


001401 




BEQ 


.+4 


2199 


010122 


104002 




ERROR 




2200 












2201 













;N0 TRAP AFTER WRITING AND READING 
;WRONG PARITY WITH AE SET- VIRTUAL 
;ADDRESS OF LOCATION IS IN R5 
; (MAPPED THRU KERNEL PAGE 1) 
;WROTE LOW BYTE IF ODDFLG IS POSITIVE 
;WROTE HIGH BYTE IF IT IS NEGATIVE 
;NOTE THAT WWP AND AE WERE CLEARED 
;BEFORE ERROR PRINTOUT 



SHOULD ENTER HERE VIA TRAP TO 114 

; PARITY T.'AP OCCURRED- BEFORE CHECKING 
;IT, CLEAR WWP AND AE IN ALL REGISTERS 



;FIND REGISTER THAT SENSED THE ERROR 
;SETUP PTR TO INDICATOR 

;DOES THIS CONTROL EXIST? 

;N0, BRANCH 

;YES- IS ERROR SET? 

;N0. BRANCH 

;YES- WAS IT SET IN ANY OTHER REGISTER ALSO? 

;N0- BRANCH 

;ERR0R SET IN MORE THAN ONE PARITY REGISTER 

;AFTER READING WRONG PARITY IN LOCATION 

;WHOSE VIRTUAL ADDRESS IS IN R5 

;DOES MAP INDICATE THAT THIS REGISTER 

;CONTROLS THIS MEMORY? 

;YES- BRANCH 

;PARITY REGISTER RESPONDED TO MEMORY 

;NOT INCLUDED IN ITS MAP. R1 POINTS TO 

;THE PARITY REGISTER'S ADDRESS. R5 

;CONTAINS VIRTUAL ADDRESS OF THE LOCATION 

;BEING TESTED (MAPPED THRU KERNEL 

;PAGE 1 ) 

;STORE REGISTER ADDRESS 

;STORE PTR TO INDICATOR 

; INCREMENT PTR TO INDICATOR 

;LOOP UNTIL ALL THE PARITY REGISTERS 

;HAVE BEEN CHECKED 

;SAVE CONTENTS OF LOCATION UNDER TEST 

;DID BICS CHANGE DATA? 

;N0, CONTINUE 

;DATA WAS MODIFIED BY THE BICB WHICH 

;GOT A PARITY ERROR TRAP- SINCE PARITY 

;TRAP OCCURRED, CONTENTS SHOULD NOT 
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2202 








2203 








2204 








2205 








2206 


010124 


005767 


170636 


2207 


010130 


001003 




2208 


010132 


104002 




2209 








2210 








2211 








2212 








2213 








2214 


010134 


000423 




2215 


010136 


001022 




2216 


010140 


022714 


000001 


2217 


010144 


001017 




2218 








2219 








2220 








2221 








2222 


010146 


01 7701 


170614 


2223 


010152 


042701 


170037 


2224 


010156 


010502 




2225 


010160 


042702 


163777 


2226 


010164 


000302 




2227 


010166 


006302 




2228 


010170 


006302 




2229 


010172 


067702 


171054 


2230 


010176 


020102 




2231 


010200 


001401 




2232 


010202 


104004 




2233 








2234 








2235 








2236 








2237 








2238 


010204 


022626 




2239 


010206 


01 1515 




2240 


010210 


005077 


170552 


2241 


010214 


005715 




2242 


010216 


005777 


170544 


2243 


010222 


100001 




2244 


010224 


104002 




2245 








2246 








2247 








2248 








2249 








2250 


010226 


005167 


170324 


2251 


10232 


100401 




2252 


010234 


005725 




2253 


010236 


020527 


040000 


2254 


010242 


103401 




2255 


010244 


000207 




2256 








2257 


010246 


000167 


177360 



TST 
BNE 
ERROR 



TREG 
3$ 



BR 


4$ 


BNE 


4$ 


CMP 


01 , (R4 


BNE 


4$ 



MOV 


!>TREG,R1 . 


BIC 


#170037, R1 


MOV 


R5.R2 


BIC 


#163777, R2 


SWAB 


R2 


ASL 


R2 


ASL 


R2 


ADD 


0KPAR1 ,R2 


CMP 


R1,R2 


BEO 


.+4 


ERRORS 





4$: 


CMP 


(SP)+,(SP 


CNT17: 


MOV 


(5), (5) 




CLR 


©TREG 




TST 


@R5 




TST 


©TREG 




BPL 


.+4 



COM 


ODDFLG 


BMI 


.+4 


TST 


(5) + 


CMP 


R5, #40000 


BLO 


1$ 


RTS 


%7 


JMP 


WWP17A 



HAVE BEEN MODIFIED. R5 CONTAINS TEST 

LOCATION ADDRESS (VIRTUAL, MAPPED THRU 

KERNEL PAGE 1). "TREG" CONTAINS ADDRESS OF 

PARITY REGISTER DETECTING PARITY ERROR 

WAS PARITY ERROR SET IN ANY REGISTER? 

YES- BRANCH 

PARITY TRAP OCCURRED ON READING 

WRONG PARITY WITH AE SET BUT NO 

REGISTER HAS THE PARITY ERROR BIT 

SET. R5 CONTAINS VIRTUAL ADDRESS 

OF THE TEST LOCATION {MAPPED THRU 

KERNEL PAGE 1 ) 

NO, BRANCH. DO NOT CHECK THE 

IS THIS A CORE PARITY REGISTER? 

NO. BRANCH. DO NOT CHECK THE 

ADDRESS BITS OF THE LAST PARITY 

ERROR 

IF CORE REG, CHECK IF ADDRESS 

BITS OF LAST PAR ERR WERE STORED 

GET CONTENTS OF REGISTER DETECTING PARITY ERROR 

MASK OFF ALL BUT ADDRESS BITS 

CALCULATE TOP 7 BITS OF ERROR ADDRESS 



; PARITY ERROR ADDRESS BITS CORRECT? 

; PARITY ERROR ADDRESS BITS (PARITY 

;REGISTER BITS 11-5) INCORRECT 

;"TREG" CONTAINS ADDRESS OF PARITY 

{REGISTER. R5 CONTAINS THE VIRTUAL 

;ADDRESS OF THE TEST LOCATION 

; (MAPPED THRU KERNEL PAGE 1) 

;RESTORE STACK POINTER 

;RESTORE TEST LOCATION TO FIX BAD PARITY 

;CLEAR ERROR BIT IN THE PARITY REGISTER 

;READ LOCATION TO SEE IF PARITY IS GOOD 

;IS PARITY ERROR SET? 

;NO. BRANCH 

{WRITING LOCATION WITH WRITE WRONG 

{PARITY CLEAR DIDN'T CLEAR BAD PARITY 

;"TREG" CONTAINS THE ADDRESS OF THE 

;PARITY REGISTER. R5 CONTAINS THE 

;VIRTUAL ADDRESS OF THE TEST LOCATION 

; (MAPPED THRU KERNEL PAGE 1) 

{TOGGLE BYTE INDICATOR 

; BRANCH IF HIGH BYTE NOT YET TESTED 

{UPDATE ADDRESS POINTER 

;THIS 4K DONE? 

;NO.TEST NEXT LOCATION 

;YES, RETURN TO CHECK FOR NEXT 

;BANK TO „E TESTED 

;GO AND TEST NEXT LOCATION 
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SEO 0042 



2258 
2259 
2260 
2261 
2262 
2263 
2264 
2265 
2266 
2267 
2268 
2269 
2270 
2271 
2272 
2273 
2274 
2275 
2276 
2277 
2278 
2279 
2280 
2281 
2282 
2283 
2284 
2285 
2286 
2287 
2288 
2289 
2290 
2291 
2292 
2293 
2294 
2295 
2296 
2297 
2298 
2299 
2300 
2301 
2302 
2303 
2304 
2305 
2306 
2307 
2308 
2309 
2310 
2311 
2312 
2313 



010252 104001 



010254 
010262 
010266 
010272 
010274 

010300 
010306 
010310 
010314 
010322 
010324 
010330 
010334 
010340 
010344 
010346 
010352 
010354 
010356 
010360 
010364 
010372 
010400 
010406 
010414 
010422 
010430 
010436 
010440 



012767 
000167 
005737 

001402 
000167 

032767 
001002 
000167 
032767 
001002 
000167 
005037 
004767 
012700 
005001 
01 1 161 
005721 
005300 
001373 
062706 
012767 
062767 
062767 
062767 
062767 
062767 
022767 
001403 
062767 



010446 000167 



010452 
010456 
010462 
010470 
010474 
010500 
010502 
010504 
010510 
010512 
010520 



013746 
004767 
012777 
004767 
012704 
005005 
005025 
020527 
103774 
012737 
012701 



000002 
175052 
000042 



001310 
000002 

001274 
177776 
003452 
017770 

020000 



020000 
030462 
020000 
020000 
020000 
020000 
020000 
177570 

020000 

020010 



177776 
005674 
000020 
003316 
021036 



030720 
020566 



026070 
023232 
023226 
023230 
023224 
023226 
170442 

010432 



XFR1: SCOPE 
;IF THE FIRST B, 
;COPY THE FIRST 
;AND THEN JUMP 



ANK (BANK 0) IS PARITY MEMORY, SETUP TO TEST IT 

4K TO THE SECOND 4K, MOVE THE STACK POINTER TO BANK 1, 
TO THE COPY OF TEST20 IN BANK 1 

; XXXXX 

;XXXX 



;IF THE PROGRAM IS RUNNING UNDER ACT THEN 
;G0 TO DONE 

; BRANCH IF YES 

;N0- DONE WITH TEST 

;IS THERE A SECOND 4K(BANK 1)? 

;YES, BRANCH 

;N0, EXIT 

;CLEAR STATUS REGISTER 

;CLEAR ALL PARITY REGISTERS 

; RO IS COUNTER TO MOVE 4K 

;R1 POINTS TO LOCATION IN BANK 

;COPY FROM BANK TO BANK 1 

{MOVE POINTER 

;DONE WITH 4K? 

;N0- BRANCH 

;YES, MOVE STACK POINTER TO POINT TO BANK 

00 ;UPDATE SCOPE RETURN IN BANK 1 

;UPDATE ADDRESSES USED IN ERROR TYPEOUT 



;DOES THE CONSOLE HAVE A SWITCH REG. ? 

; IF SO THEN GO TO 2$ 

;OTHERWISF. THERE IS A SOFTWARE SWITCH LOCATION 

;AND ITS mDDRESS SHOULD BE UPDATED 

; GO TO TEST 20 IN BANK 1 



MOV 


#2,BITPT 


JM" 


TEST14 


TST 


@#42 


BEO 


.+6 


JMP 


DONE 


BIT 


#1 , PMEML 


BNE 


.+6 


JMP 


DONE 


BIT 


#2,MEML 


BNE 


.+6 


JMP 


DONE 


CLR 


@#P5 


JSR 


%7,CLRPAR 


MOV 


#17770, RO 


CLR 


R1 


MOV 


@R1 ,20000(R1 ) 


TST 


(R1) + 


DEC 


RO 


BNE 


1$ 


ADD 


#20000, SP 


MOV 


#TEST20+20010,RETU 


ADD 


#20000, ERRA1+20000 


ADD 


#20000 .ERRA2+20000 


ADD 


#20000, ERRA3-I-20000 


ADD 


#20000, ERRA4+20000 


ADD 


#20000, ERRA5+2000Q 


CMP 


#1 77570, SWR 


BEO 


2$ 


ADD 


#20000 .SWR+20000 



TEST20 + 2.0010 



IF FIRST 4K IS PARITY MEMORY, CHECK IT WITH A SERIES OF PATTERNS 

THIS SUBTEST IS RUN IN 8ANK 1 (20000 ABOVE THE ADDRESSES IN THE LISTING) 



010524 032711 000001 



MOV @#PS,-(SP) 

JSR PC.SCOPEC 

MOV #20, ^DISPLAY 

JSR %7,CLRPAR 

MOV #PARPAT+20000,R4 

CLR R5 

CLR (5)+ 

CMP R5, #20000 

BLO 1$ 

MOV #TRP20+20000,@#PARVEC 

MOV #MPR0+20000,R1 

BIT #1,@R1 



; THESE 2 LINES DO THE SAME AS A SCOPE WITHOUT 

; USING AN EMT 

; LOAD THE TEST NUMBER INTO THE DISPLAY 

{CLEAR ALL PARITY REGISTERS 

{INITIALIZE PATTERN POINTER 

INITIALLY CLEAR BANK 



; SETUP TRAP RETURN 

; SETUP TO SET ACTION ENABLE IN ALL 

; PARITY REGISTERS PRESENT 
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SEO 0043 



2314 


010530 


001003 








BNE 


. + 10 


2315 


010532 


012771 


000001 


000000 




MOV 


#AE,@(R1 ) 


2316 


010540 


062701 


000010 






ADD 


#10, R1 


2317 


010544 


020127 


020766 






CMP 


R1 ,#TREG+20Q00 


2318 


010550 


103765 








BLO 


2$ 


2319 
















2320 


010552 


004767 


000022 




3$: 


JSR 


%7,CKBK0 


2321 


010556 


005724 








TST 


(4) + 


2322 


010560 


005714 








TST 


(4) 


2323 


010562 


001373 








BNE 


3$ 


2324 


010564 


004767 


003222 




D0NE20! 


JSR 


PC.CLRPAR 


2325 


010570 


012737 


000116 


0001 14 




MOV 


#PARVEC+2,@#PARVEC 


2326 


010576 


000526 








BR 


TEST21 


2327 

















;SET ACTION ENABLE IF REGISTER IS PRESENT 



;BRANCH UNTIL ALL REGISTER ADDRESSES 

;HAVE BEEN CHECKED 

;EXERCISE THIS 4K 

;UPDATE PATTERN 

;LAST PATTERN? 

;N0. LOOP 

;CLEAR ALL PARITY REGISTERS 

;RESTORE TRAP CATCHER 
;G0 TO NEXT TEST 
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SEQ 0044 



2328 








;PARITY 


MEMORY TEST ROUTINE 




2329 








;WRITES 


> AND 


CHECKS EACH LOCATION 


IN 3ANK 


2330 








;WITH VALUE 


POINTED TO BY R4 




2331 


010600 


005005 




CKBKO: 


CLR 


R5 




2332 


010602 


01 1415 




1$: 


MOV 


(4), (5) 




2333 


010604 


021415 






CMP 


(4), (5) 




2334 


010606 


001404 






BEO 


. + 12 




2335 


010610 


013746 


177776 




MOV 


@#PS,-(SP) 




2336 


010614 


004767 


002742 




JSR 


PC, ERR 




2337 
















2338 
















2339 


010620 


005725 






TST 


(5) + 




2340 


010622 


020527 


000114 




CMP 


R5.0114 




2341 


010626 


001002 






BNE 


.+6 




2342 


010630 


062705 


000004 




ADD 


04, R5 




2343 


010634 


020527 


020000 




CMP 


R5, #20000 




2344 
















2345 


010640 


103760 






BLO 


1$ 




2346 


010642 


005067 


170120 




CLR 


TREG 




2347 


010646 


012701 


020566 




MOV 


#MPR0+20000,R1 




2348 


010652 


032711 


000001 


2$: 


BIT 


#1,(1) 




2349 


010656 


001003 






BNE 


. + 10 




2350 


010660 


005771 


000000 




TST 


@(R1) 




2351 


010664 


100406 






BMI 


3$ 




2352 


010666 


062701 


000010 




ADD 


#10, R1 




2353 


010672 


020127 


020766 




CMP 


R1 ,#TREG+20000 




2354 


010676 


103765 






BLu 


2$ 




2355 


010700 


000207 






RTS 


%7 




2356 


010702 


013746 


177776 


3$: 


MOV 


<a#P'3,-(SP) 




2357 


010706 


004767 


002650 




JSR 


PC, ERR 




2358 
















2359 
















2360 
















2361 


010712 


022626 






CMP 


(SP)+,(SP)+ 




2362 


010714 


000167 


177644 




JMP 


D0NE20 




2363 
















2364 








;PARITY 


TRAP 


SERVICE (NO TRAPS TO 


114 SHC 


2365 


010720 


005067 


170042 


TRP20: 


CLR 


TREG 




2366 


010724 


012701 


020566 




MOV 


#MPR0+20000,R1 




2367 


010730 


03271 1 


000001 


1$: 


BIT 


#1 ,(R1 ) 




2368 


010734 


001003 






BNE 


. + 10 




2369 


010736 


005771 


000000 




TST 


@(R1) 




2370 


010742 


100412 






BMI 


2$ 




2371 


010744 


062701 


000010 




ADD 


#10, R1 




2372 


010750 


020127 


020766 




CMP 


R1 ,#TREG+20000 




2373 


010754 


103765 






BLO 


1$ 




2374 


010756 


013746 


177776 




MOV 


@#PS,-(SP) 




2375 


010762 


004767 


002574 




JSR 


PC, ERR 




2376 
















2377 


010766 


000430 






BR 


5$ 




2378 


010770 


01 7102 


000000 


2$: 


MOV 


@(R1 ) ,R2 




2379 


010774 


005003 






CLR 


R3 




2380 


010776 


005071 


000000 


3$: 


CLR 


@(R1) 




2381 


01 1002 


005713 






TST 


@>R3 




2382 


011004 


005771 


000000 




TST 


@(R1) 




2383 


01 1010 


100413 






BMI 


4$ 





(EXCEPT 114 AND 116) 

;SET ADDRESS POINTER 

;WRITE PATTERN 

;DATA OK? 

;YES- BRANCH 

;SETUP TO DO ERROR CALL VIA JSR 

; ERROR^ DATA INCORRECT IN LOCATION 

JWHOSE ADDRESS IS IN R5. R4 POINTS 

;T0 THE VALUE WRITTEN. 

;UPDATE ADDRESS POINTER 

;DON'T CHANGE CONTENTS OF 114 AND 116 



;HAS THE WHOLE BANK BEEN TESTED WITH 
;THIS PATTERN? 

;N0, BRANCH TO TEST NEXT LOCATION 
;YES, DID ANY PARITY ERROR BITS SET? 



YES- BRANCH 



NO- RETURN 

SETUP TO DO ERROR CALL VIA JSR 

ERROR- PARITY ERROR BIT SET AND NO 

PARITY TRAP OCCURRED 

(AE WAS SET) - R1 POINTS TO ADDRESS 

OF PARITY REGISTER 

RESTORE STACK POINTER 



;FIND THE REGISTER RECORDING A PARITY ERROR 



BRANCH IF ERROR IS SET 



SETUP TO DO ERROR CALL VIA A JSR 

ERROR- PARITY TRAP TO 114 OCCURRED DURING 

TEST 20 BUT NO REGISTERS HAVE PARITY 

ERROR SET 

SAVE CONTENTS OF PARITY REGISTER 

INITIALIZE ADDRESS POINTER 

CLEAR PARITY REGISTER 

READ LOCATION 

PARITY E-ROR SET? 

YES- BRANCH 
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2384 
2385 
2386 
2387 
2388 
2389 
2390 
2391 
2392 
2393 
2394 
2395 
2396 
2397 
2398 
2399 
2400 
2401 
2402 
2403 
2404 
2405 
2406 
2407 
2408 
2409 
2410 
241 1 
2412 
2413 
2414 
2415 
2416 
2417 
2418 
2419 
2420 
2421 
2422 
2423 
2424 
2425 
2426 
2427 
2428 
2429 
2430 
2431 
2432 
2433 
2434 
2435 
2436 
2437 
2438 
2439 



011012 
011-014 

01 1020 
011022 
01 1026 
011032 



005723 
020327 
103766 
010271 
01 3746 
004767 



000000 
177776 
002524 



011036 000404 

011040 013746 177776 

011044 004767 002512 



011050 022626 
011052 000207 



01 1054 
01 1060 
01 1064 
01 1072 
01 1076 
01 1 1 00 
011102 
01 1 106 



01 1 134 
01 1 140 
01 1 142 
01 1 1 50 
01 1154 
01 1 160 
01 1 162 
01 1 1 66 
01 1 1 70 



01 3746 
004767 
01 2777 
004767 
005005 
005025 
020527 
103774 



177776 
005272 
000021 
002714 



011110 005005 

011112 005067 167440 

011116 012767 125253 

011124 012715 125253 

011130 012701 020566 



03271 1 
001003 
01 2771 
062701 
020127 
103765 
005767 
100404 
112715 



000001 

000004 
000010 
020766 
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TST (R3)+ 




CMP R3, #20000 




BLO 3$ 




MOV R2,P(R1) 




MOV @#PS,-(SP) 




JS«? PC, ERR 





SEQ 0045 



;MOVE POINTER 



BR 


5$ 


MOV 


@#PS,-(SP 


JSR 


PC, ERR 



CMP (SP)+,(SP) 
RTS %7 



;RESTORE PARITY REGISTER CONTENTS 

;SETUP TO CALL ERROR VIA JSR 

;PARITY ERROR OCCURRED WHILE TESTING 

;BANK BUT NO BAD PARITY WAS FOUND 

;DURING SCAN OF BANK 0. R1 POINTS 

;T0 THE ADDRESS OF THE PARITY REGISTER 

;DETECTING THE ERROR 

;SETUP TO DO ERROR CALL VIA JSR 
;PARITY ERROR WHILE EXERCISING MEMORY 
;BANK 0- R1 POINTS TO ADDRESS OF PARITY 
;REGISTER DETECTING THE ERROR. R3 CONTAINS 
;THE ADDRESS OF THE LOCATION HAVING 
; BAD PARITY 

;RETURN TO CHECK USING THE NEXT PATTERN 



FORCE WRONG PARITY IN EACH LOCATION IN BANK 

NOTE THAT THIS SUBTEST IS EXECUTED IN BANK 1 (20000 ABOVE ADDRESSES 

IN ' HE LISTING). MAKE SURE THAT WRONG PARITY IN EACH BYTE CAN BE DETECTED, 

AND THAT WHEN GOOD PARITY IS WRITTEN AND READ NO PARITY ERROR IS DETECTED. 

CHECK ERROR ADDRESS BITS (PARITY REGISTER BITS 5-11) 



TEST21 : MOV 
JSR 
MOV 
JSR 
CLR 

15: CLR 
CMP 
BLO 



@#PS,-(SP) 

PC.SCOPEC 

#21 ,@DISPLaY 

PCCLRPAR 

R5 

(R5) + 

R5, #20000 

1$ 



;SAME AS SCOPE WITHOUT DOING EMT 



; LOAD THE TEST NUMBER INTO THE DISPLAY 
;CLEAR ALL PARITY REGISTERS 



;CLEAR PAkITY ERRORS IN BANK 



;WRITE WRONG PARITY TEST ROUTINE 

;USING SAME DATA VALUE, WRITES AND CHECKS PARITY IN WRONG STATE 
;AND THEN IN CORRECT STATE TO PROVE THAT PARITY BITS TOGGLE 
WWP21: CLR R5 ;SET TEST ADDRESS POINTER 



CLR 
CLR 
MOV 
MOV 
MOV 

BIT 

BNE 
MOV 
ADD 
CMP 
BLO 
TST 
BMI 
MOVB 



ODDFLG 

#125253, SHDBE 
#125253, @R5 
#MPR0+20000,R1 

#1,(1) 
. + 10 

#WWP,<a>( R1 ) 

#10, R1 

R1 ,#TREG+20000 

1$ 

ODDFLG 

2$ 

#253, @R5 



;CLEAR FLAG TO INDICATE TESTING LOW BYTE 

; STORE DATA FOR USE BY ERROR TYPEOUT ROUTINE 

INITIALIZE LOCATION 

;SETUP TO SET WRITE WRONG PARITY 

; IN ALL REGISTERS 



;SET WRITE WRONG PARITY 



TESTING HIGH BYTE? 

YES, BRANCH 

NO. WRITE WRONG PARITY IN LOW BYTE 



CCMFAFO, MEMORY PARITY TEST 
CCMFAF.P11 13-JAN-78 12:13 



MACY11 30A(1052) 



2440 


01 1 174 


005715 






2441 


01 1 176 


000405 






2442 


01 1200 


11 2765 


000252 000001 2$ 


2443 


01 1206 


105765 


000001 




2444 


01 1212 


01 2701 


020566 


3$ 


2445 


011216 


012703 


000770 




2446 


01 1222 


032711 


000001 


4$ 


2447 


01 1226 


001003 






2448 


01 1230 


042771 


000004 000000 


2449 


01 1236 


062701 


000010 




2450 


01 1 242 


020127 


020766 




2451 


01 1246 


103765 






2452 


01 1250 


01 2701 


020566 




2453 


01 1254 


005067 


167506 




2454 


011260 


03271 1 


000001 


L0( 


2455 


01 1264 


001024 






2456 


01 1266 


005771 


000000 




2457 


01 1272 


100021 






2458 


01 1274 


005767 


167466 




2459 


011300 


001404 






2460 


01 1302 


013746 


177776 




2461 


01 1306 


004767 


002250 




2462 










2463 










2464 


011312 


032761 


000001 000002 


2465 










2466 


01 1320 


001004 






2467 


01 1322 


013746 


177776 




2468 


011326 


004767 


002230 




2469 










2470 










2471 










2472 










2473 


01 1332 


01 1167 


167430 




2474 


01 1336 


062701 


000010 


5$ 


2475 


01 1342 


005723 






2476 


01 1344 


020127 


020766 




2477 


01 1350 


103743 






2478 










2479 


011352 


005767 


167410 




2480 


01 1356 


001005 






2481 


01 1360 


013746 


177776 




2482 


011364 


004767 


002172 




2483 










2484 










2485 


01 1370 


000423 






2486 


01 1372 


022713 


000001 


6$ 


2487 


011376 


001020 






2488 










2489 


01 14 00 


01 7701 


167362 




2490 


01 1404 


042701 


170037 




2491 


01 1410 


010502 






2492 


011412 


042702 


003777 




2493 


01 1416 


000302 






2494 


011420 


006302 






2495 


011422 


006302 
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TST 


(R5) 


BR 


3$ 


MOVB 


#252,1 (R5) 


TSTB 


KR5) 


MOV 


#MPR0+20000,R1 


MOV 


#INDC0,R3 


BIT 


#1 ,@R1 


BNE 


. + 10 


BIC 


#WWP,@(R1 ) 


ADD 


# 1 , R 1 


CMP 


R1 ,#TREG+20000 


BLO 


4$ 


MOV 


#MPR0+20000,R1 


CLR 


TREG 


BIT 


#1 ,@R1 


BNE 


5$ 


TST 


@(R1) 


BPL 


5$ 


TST 


TREG 


BEO 


.+12 


MOV 


@#PS,-(SP) 


JSR 


PC, ERR' 


BIT 


#1 ,2(R1 ) 


BNE 


. + 12 


MOV 


@#PS,-(SP) 


JSR 


PC, ERR 



MOV 


PR1 ,TREG 


ADD 


#10, R1 


TST 


(R3) + 


CMP 


R1 ,#TREG+20000 


BLO 


L00P21 


TST 


TREG 


BNE 


6$ 


MOV 


@#PS,-(SP) 


JSR 


PC, ERR 


BR 


7$ 


CMH 


#1 , (R3) 


BNE 


7$ 


MOV 


@>TREG,R1 


BIC 


#170037, R1 


MOV 


R5.R2 


BIC 


#3777, R2 


SWAB 


R2 


ASL 


R2 


ASL 


R2 



;DETECT WRONG PARITY WITH DATI 

WRITE WRONG PARITY IN HIGH BYTE 

DETECT WRONG PARITY WITH DATI 

SETUP TO CLEAR WWP IN ALL PARITY REGISTERS 

POINTER TO INDICATOR 



;CLEAR WWP IN ALL PARITY REGISTERS 



;CHECK TO SEE IF ANY REGISTER DETECTED 
;THE PARITY ERROR 



CHECK PARITY REGISTER 

BRANCH IF PARITY ERROR IS NOT SET 

WAS PARITY ERROR SET IN ANY OTHER REGISTER? 

NO- BRANCH 

SETUP TO DO ERROR CALL VIA A JSR 

ERROR- PARITY ERROR SET IN MORE THAN 

ONE REGISTER AFTER WRITING WRONG PARITY 

IN LOCATION WHOSE ADDRESS IS IN R5 

DOES MAP INDICATE THAT THIS REGISTER 

CONTROLS THIS MEMORY? 

YES, BRANCH 

NO- SETUP TO DO ERROR CALL VIA A JSR 

ERROR- PARITY REGISTER RESPONDED 

TO MEMORY WHICH IS NOT IN ITS MAP. 

R1 POINTS TO PARITY REGISTER'S ADDRESS. 

R5 CONTAINS ADDRESS OF LOCATION BEING 

TESTED 

STORE REGISTER ADDRESS 



;BRANCH UNTIL ALL REGISTERS HAVE BEEN 

;CHECKED 

;WAS PARITY ERROR SET IN ANY REGISTER? 

;YES- BRANCH 

;N0- SETUP TO DO ERROR CALL VIA A JSR 

;ERROR- NO REGISTER HAS PARITY ERROR 

;SET AFTER READING WRONG PARITY IN LOCATION 

; WHOSE ADDRESS IS IN R5 

; IS THIS A CORE PAR REG? 
;N0, BRANCH(MOS PAR REG DOES NOT 
;STORE ADDR BITS OF PAR ERROR) 
;GET PARITY REGISTER CONTENTS 
;MASK ALL BUT ERROR ADDRESS BITS 
;GET ADDRESS OF LOCATION UNDER TEST 
'.POSITION BITS IN R2 
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2496 


01 1424 


020102 






2497 


01 1426 


001404 






2498 


01 1430 


013746 


177776 




2499 


01 1434 


004767 


002122 




2500 










2501 










2502 










2503 


01 1440 


01 1515 






2504 


01 1442 


005077 


167320 




2505 


01 1446 


005715 






2506 


01 1450 


005777 


167312 




2507 


01 1454 


100004 






2508 


01 1456 


01 3746 


177776 




2509 


01 1462 


004767 


002074 




2510 










2511 










2512 










2513 










2514 


01 1466 


005167 


167064 




2515 


01 1472 


100401 






2516 


01 1474 


005725 






2517 


01 1476 


020527 


020000 




2518 


01 1502 


103610 






2519 


01 1504 


004767 


002302 




2520 


011510 


013746 


177776 




2521 


01 1514 


004767 


004636 




2522 










2523 










2524 


01 1520 


01 2700 


017770 




2525 


01 1524 


005001 






2526 


01 1526 


016111 


020000 




2527 


01 1532 


005721 






2528 


01 1534 


005300 






2529 


01 1536 


001373 






2530 


01 1540 


162706 


020000 




2531 


01 1544 


162737 


020000 


013632 


2532 


01 1552 


162737 


020000 


013634 


2533 


01 1560 


162737 


020000 


013644 


2534 


01 1566 


162737 


020000 


013646 


2535 


01 1574 


162737 


020000 


013656 


2536 


01 1602 


022737 


177570 


001100 


2537 


01 1610 


001403 






2538 


011612 


162737 


020000 


001 100 


2539 










2540 


01 1620 


000167 


160000 




2541 










2542 










2543 










2544 










2545 










2546 










2547 


01 1624 


012737 


0001 16 


0001 14 


2548 


01 1632 


01 2706 


000510 




2549 


01 1636 


0C4767 


002150 




2550 


01 1642 


005237 


01 1752 




2551 


01 1646 


004567 


003544 





CMP 
6£0 
MOV 
JSR 



R1 ,R2 

7$ 

@#PS,-(SP) 
PC, ERR 



MOV 


@R5,@R5 


CLR 


PTREG 


TST 


@R5 


TST 


@TREG 


BPL 


. + 12 


MOV 


»#PS,-(SP) 


JSR 


PC, ERR 



COM 


ODDFLG 


BMI 


.+4 


TST 


(R5) + 


CMP 


R5, #20000 


BLO 


WWP21A 


JSR 


PC.CLRPAR 


MOV 


@#PS,-(SP) 


JSR 


PC.SCOPEC 


ICOND 


4K BANK BACK TO F 


MOV 


#17770,R0 


CLR 


R1 


MOV 


20000(R1 ) ,PR1 


TST 


(R1) + 


DEC 


RO 


BNE 


1$ 


SUB 


#20000, SP 


SUB 


#20000, @>#ERRA1 


SUB 


#20000, |3#ERRA2 


SUB 


#20000, @#ERRA3 


SUB 


#20000, isi#ERRA4 


SUB 


#20000 ,@>#ERRA5 


CMP 


#177570, <P>#SWR 


BEO 


2$ 


SUB 


#20000, (S>#SWR 


JMP 


DONE-20000 



;PARITY ERROR ADDRESS BITS CORKECT? 

;BRANCH IF YES 

;N0- SETUP TO DO ERROR CALL VIA A JSR 

;ERRQR- ADDRESS BITS (PARITY REGISTER 

;BiTS 5-11) INCORRECT- ADDRESS OF PARITY 

REGISTER IS CONTAINED IN LOCATION "TREG" 

;ADDRES5 OF TEST LOCATION IS IN R5 

;RESTORE TEST LOCATION TO FIX BAD PARITY 

;CLEAR ERROR BIT IN PARITY REGISTER 

;READ LOCATION TO SET IF PARITY IS GOOD 

;CHECK PARITY ERROR BIT 

;BRANCH IF NOT SET 

;SETUP TO DO ERROR CALL VIA A JSR 

;ERROR- WRITING LOCATION WITH WRITE 

;WRQNG PARITY CLEAR DIDN'T CLEAR BAD 

;PARITY (ADDRESS OF LOCATION IS IN R5) 

;"TREG" +20000 CONTAINS THE ADDRESS 

;0F THE PARITY REGISTER 

;TOGGLE BYTE INDICATOR 

; BRANCH IF HIGH BYTE NOT YET TESTED 

IUPDATE ADDRESS POINTER 

;THIS 4K DONE? 

;LOOP TILL ALL 4K HAS BEEN TESTED 

;CLEAR ALL PARITY REGISTERS 

;SETUP TO CALL SCOPE VIA JSR 

; SCOPE 

AND RETURN TO FIRST 4K BANK 
;R0 IS USED AS A COUNTER 
;R1 POINTS TO THE CURRENT LOCATION 
;COPY BANK 1 TO BANK 



-.RESTORE STACK POINTER 



;DOES THE CONSOLE HAVE A SWITCH REG. ? 
; IF SO THEN GO TO 2$ 

;OTHERWISE RESTORE THE ADDRESS OF SOFTWARE 
;SWITCH REGISTER 

;RETURN TO BANK 



AT THIS POINT EXECUTION RETURNS TO BANK 
DONE: 



MOV 


#PARVEC+2,@#PARVEC 


MOV 


#STKPT,SP 


JSR 


%7,CLRPAR 


INC 


@#PASCNT 


JSR 


R5.0ACNV 



IRESTORE TRAPCATCHER 
REINITIALIZE STACK POINTER 
;CLEAR ALL PARITY REGISTERS 

;-EEP TRACK OF PASSES COMPLETED 
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2552 


01 1652 


01 1752 






2553 


01 1654 


017401 






2554 


011656 


000006 






2555 


01 1 660 


104000 






2556 


01 1662 


017363 






2557 


01 1664 


005000 






2558 


01 1666 


0052C0 






2559 


01 1670 


001376 






2560 


01 1672 


013705 


000042 




2561 


01 1676 


001405 






2562 


01 1700 


000005 






2563 


01 1702 


004715 






2564 


01 1704 


000240 






2565 


01 1 706 


000240 






2566 


011710 


000240 






2567 


011712 


032777 


000400 


167160 


2563 


01 1720 


001401 






2569 


01 1722 


000000 






2570 


01 1724 


105767 


167162 




2571 


01 1730 


001006 






2572 


01 1732 


105777 


167146 




2573 


01 1736 


100375 






2574 


01 1 740 


1 12777 


000000 


167140 


2575 


011746 


000167 


170134 




2576 


01 1752 


000000 






2577 


01 1754 


000000 






2578 










2579 










2580 










2581 










2582 










2583 










2584 










25e5 


01 1756 


012737 


012162 


000004 


2586 


01 1764 


005737 


177572 




2587 










2588 










2589 


01 1770 


005067 


166554 




2590 


01 1774 


004767 


001712 




2591 


012000 


004767 


002056 




2592 










2593 










2594 


012004 


005067 


166534 




2595 


012010 


012767 


177777 


167046 


2596 


012016 


012767 


077777 


167042 


2597 


012024 


012767 


000001 


166466 


2598 


012032 


012767 


001064 


166506 


2599 


012040 


012737 


012150 


000004 


2600 


012046 


016777 


166472 


167176 


2601 


012054 


005737 


021000 




2602 


012060 


0C5737 


025000 




2603 


012064 


005737 


031000 




2604 


012070 


005737 


035000 




2605 


012074 


062767 


000200 


166442 


2606 


012102 


006367 


166412 




2607 


012106 


103006 







1$ 



PASCNT 

MPCNT 

6 

TYPE 

MPGEND 

CL D 

INC 

BNE 

LOGICAL: 

BEO 

RESET 

SENDAD: JSR 
NOP 
NOP 
NOP 

CONT: BIT 
BEO 
HALT 
TSTB 
BNE 
TSTB 
BPL 
MOVB 

1$: JMP 

PASCNT: 

MONC'.T: 



;TYPE BELL, "END PASS=» AND PASS COUNT 



;ALLOW TIME FOR END PASS MESSAGE TO PRINT 



7,(5) 



#BIT8,@SWR 
.+4 



@#42,R5 ; LOADED BY MONITOR? 

;BRANCH IF NO 



;G0 TO MONITOR 



;SWITCH 8 SET? 

;HALT AT END OF PASS SET 



#0,@TPB 
BEGIN 



; IF NO TERMINAL. SKIP 

;WAIT FOR TTY TO FINISH SO THAT RESET 

;WON'T CLOBBER THE BELL 
;OUTPUT A NULL 



CREATE MAP INDICATING WHERE 4K BLOCKS OF MEMORY ARE PRESENT 



MAPMEM: 



MOV 
TST 



#MAPMB,(g>#4 
@#SRO 



;MAP MEMORY USING KT11 - 
MAPMA: CLR NOKT 

JSR %7,NRALL 
JSR %7,MAP1 



CLR 


TBANK 


MOV 


#177777, MEML 


MOV 


#77777, MEMH 


MOV 


#1 .BITPT 


MOV 


#MEML,MEMUT 


MOV 


#5$,@#4 


MOV 


TBANK, §>KPAR1 


TST 


##21000 


TST 


@#25000 


TST 


##31000 


TST 


@#35000 


ADD 


#200, TBANK 


ASL 


BITPT 


BCC 


4$ 



;SET NO MEM MANAGEMENT TRAP 
;IS KT PRESENT? (TIMEOUT IF NO) 

124K POSSIBLE 

; INDICATE KT1 1 PRESENT 

; INITIALLY SET ALL PAGES NONRESIDENT, BANK 

;MAP KERNEL TO BANK 0, RW 

;MAP KERNEL 7 TO THE EXTERNAL BANK, RW 

;MAP KERNEL 1 RW, AND TURN ON KT11 

;SET UP CORE MAPS 

;SET UP 4K POINTER 

;SET UP FOR TIME OUTS 

;MAP KERNEL PAGE 1 TO BANK BEING TESTED 

; 1ST K PRESENT? 

;2ND K PRESENT? 

;3RD K PRESENT 

;4TH K PRESENT? 

;UPDATE TEST ADDRESS 

;UPDATE BANK POINTER 

; BRANCH IF NOT DONE WITH 64K SECTION 
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2608 
2609 
2610 
2611 
2612 
2613 
2614 
2615 
2616 
2617 
2618 
2619 
2620 
2621 
2622 
2623 
2624 
2625 
2626 
2627 
2628 
2629 
2630 
2631 
2632 
2633 
2634 
2635 
2636 
2637 
2638 
2639 
2640 
2641 
2642 
2643 
2644 
2645 
2646 
2647 
2648 
2649 
2650 
2651 
2652 
2653 
2654 
2655 
2656 
2657 
2658 
2659 
2660 
2661 
2662 
2663 



0121 10 
0121 16 
012124 
012132 
012134 
012140 
012146 
012150 

012156 
012160 



012162 
012170 
012172 
012200 
012206 
012212 
012220 
012222 
012226 
012232 
012236 
012242 
012246 
012252 
012260 
012262 
012270 
012272 

012300 
012302 



012304 
012312 
012320 
012326 
012332 
012336 



012767 
012767 
022767 
003345 
005037 
012737 
000207 
046777 

022626 
000745 



012767 
022626 
012737 
012767 
005067 
012767 
005001 
005761 
005761 
005761 
005761 
062701 
006367 
022767 
003360 
012737 
000207 
046767 

022626 
000757 



013767 
012767 
01 2767 

005067 
005067 

005067 



012346 

012352 
012356 

012360 



000001 
001066 
007600 

177572 
000006 
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166402 
166422 
166412 



012272 
000177 
166654 
000001 

OOIOOO 
005000 
01 1000 
015000 
020000 
166246 
000200 

000006 



001064 
000001 
000001 
166232 
166206 
166210 



012342 005067 166662 



012702 000566 

032712 000001 
001003 

012772 000004 



000004 
166370 



000001 166360 MAPMB: 



000004 
166656 



166240 
000004 
166564 
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MOV 


#1 f BITPT 


MOV 


#MEMH,M£MUT 


CMP 


#7600, TBANK 


BGT 


2$ 


CLR 


@#SRO 


MQV 


#6,@#4 


RTS 


%7 


BIG 


BITPT, PMEMUT 


CMP 


(SP)+,(SP)+ 


BR 


3$ 


PRESENT 


- MAP MAX OF 28K IN 


MOV 


#1 ,NOKT 


CMP 


(SP)+,(SP)+ 


MOV 


#3$,@#4 


MOV 


#177,MEML 


CLR 


MEMH 


MOV 


#1 .BITPT 


CLR 


R1 


TST 


1000(1 ) 


TST 


5000(1 ) 


TST 


1 1000(1 ) 


TST 


15000(1 ) 


ADD 


#20000, R1 


ASL 


BITPT 


CMP 


#200, BITPT 


BGT 


1$ 


MOV 


#6,©#4 


RTS 


%7 


BIC 


BITPT, MEML 


CMP 


(SP)+, (SP)+ 


BR 


2$ 



SEQ 0049 



;YES, DO MEMH(64~124K) 

EXTERNAL BANK YET? 

NO, NOT YET 

YES- DISABLE KT1 1 

RESTORE TRAPCATCHER 

RETURN 

TIMEOUT OCCURRED-CLEAR BIT TO INDICATE 

4K BLOCK NOT PRESENT 

ADJUST STACK 

CHECK NEXT BLOCK 



28K IN 4K CONTIGUOUS BLOCKS 

SET FLAG TO INDICATE KT11 NOT PRESENT 
RESTORE -TACK POINTER 
SET UP TIMEOUT RETURN 
INITIALIZE MAP 



SETUP 4K POINTER 

INITIALIZE BANK ADDRESS 

1ST K PRESENT 

2ND K PRESENT 

3RD K PRESENT 

4TH K PRESENT 

UPDATE TEST ADDRESS 

UPDATE POINTER TO NEXT 4K 

28K CHECKED YET? 

NO, CHECK NEXT 4K BLOCK 



TIMEOUT OCCURRED- CLEAR BIT TO 
INDICATE 4K BLOCK NOT PRESENT 
ADJUST STACK POINTER 



MAP PARITY CORE AND CORRESPONDENCE TO ASSOCIATED REGISTERS 



166234 
166200 
166700 



MOV 
MOV 
MOV 
CLR 
CLR 
CLR 

CLR 



@#MEML,MEMUT 
#1 , BITPT 
#1 .KTSTART 
RELOC 
TBANK 
HI WORD 

ADRTYP 



LOAD MAP OF MEMORY PRESENT IN LOWER 64K 

INITIALIZE 4K POINTER 
INDICATE KT1 1 NOT IN USE 

INITIALIZE ADDRESS OF TEST BANK 
CLEAR FLAG TO INDICATE FIRST 64K 

BEING CHECKED 



SET WRITE WRONG PARITY IN ALL REGISTERS PRESENT 

THEN WRITE TEST LOCATION VIA DATO AND READ TEST LOCATION VIA DATI 

THEN CLEAR WRITE WRONG PARITY IN ALL REGISTERS 



MAPRB: 
1$: 



MOV 
BIT 
BNE 
MOV 



#MPR0,R2 
#1,(2) 



LOAD ADDRESS OF TABLE 

IS THIS REGISTER PRESENT? 

NO, GET NEXT ONE 

YES, SET WRITE WRONG PARITY AND CLEAR REST 



MFAFO 


, MEMORY 


PARITY 


TEST 


MACY11 


30A(1052) 13- 


JAN-7B 12:27 PAGE 


50 


MFAF. 


P11 13-JAN-78 


12:13 












2664 


012366 


062702 


000010 






ADD 


#10, R2 




2665 


012372 


020227 


000766 






CMP 


R2,#TREG 




2666 


012376 


103765 








BLO 


1$ 




2667 


012400 


016703 


166140 






MOV 


TBANK, R3 




2668 


012404 


066703 


166620 






ADD 


ADRTYP, R3 




2669 


012410 


011313 








MOV 


(3), (3) 




2670 


012412 


005713 








TST 


(3) 




2671 


01 2414 


01 2702 


000566 






MOV 


#MPR0,R2 




2672 


012420 


032712 


000001 




2$: 


BIT 


#1 ,(2) 




2673 


012424 


001003 








BNE 


. + 10 




2674 


012426 


042772 


000004 


000000 




BIC 


#WWP,<a(2) 




2675 


















2676 


012434 


062702 


000010 






ADD 


#10, R2 




2677 


012440 


020227 


000766 






CMP 


R2,#TREG 




2678 


012444 


103765 








BLO 


2$ 




2679 


01 2446 


01 2702 


000556 




MAPRC: 


MOV 


#MPR0-10,R2 




2680 


012452 


062702 


000010 




1$: 


ADD 


#10, R2 




2681 


012456 


020227 


000766 






CMP 


R2,#TREG 




2682 


012462 


002031 








BGE 


MAPRD 




2683 


012464 


032712 


000001 






BIT 


#1,(2) 




2684 


012470 


001370 








BNE 


1$ 




2685 


012472 


0C5772 


000000 






TST 


@>(R2) 




2686 


















2687 


012476 


100365 








BPL 


1$ 




2688 


012500 


005767 


166046 






TST 


HIWORD 




2689 


012504 


001004 








BNE 


2$ 




2690 


012506 


056762 


166006 


000002 




Bib 


BITPT, 2(2) 




2691 


012514 


000403 








BR 


3$ 




2692 


012516 


056762 


165776 


000004 


2$: 


BIS 


BITPT, 4(2) 




2693 


012524 


105762 


000007 




3$: 


TSTB 


7(2) 




2694 


















2695 


012530 


001005 








BNE 


4$ 




2696 


012532 


1 16762 


166472 


000006 




MOVB 


ADRTYP, 6(2) 




2697 


012540 


105262 


000007 






INCB 


7(2) 




2698 


















2699 


012544 


000742 






4$: 


BR 


1$ 




2700 


012546 


011313 






MAPRD: 


MOV 


lB>R3,@R3 




2701 


012550 


062767 


000002 


166452 




ADD 


#2, ADRTYP 




2702 


012556 


026727 


166446 


000010 




CMP 


ADRTYP, #10 




2703 


012564 


001402 








BEO 


1$ 




2704 


012566 


000167 


177554 






JMP 


MAPRB 




2705 


012572 


005767 


165754 




1$: 


TST 


HIWORD 




2706 


012576 


001021 








BNE 


MAPRE 




2707 


012600 


026727 


165714 


000100 




CMP 


BITPT, #100 




2708 


012606 


103015 








BHIS 


MAPRE 




2709 


012610 


062767 


020000 


165726 




ADD 


#20000, TBANK 




2710 


012616 


0C6367 


165676 






ASL 


BITPT 




2711 


012622 


005067 


166402 






CLR 


ADRTYP 




2712 


012626 


036767 


165666 


165712 




BIT 


BITPT, MEMUT 




2713 


012634 


001756 








BEQ 


1$ 




2714 


012636 


000167 


177504 






JMP 


MAPRB 




2715 


012642 


005767 


165702 




MAPRE: 


TST 


NOKT 




2716 


012646 


001401 








BEO 


.+4 




2717 


012650 


000207 








RTS 


%7 




2718 


012652 


005767 


166350 






TST 


KTSTART 




2719 


012656 


001417 








BEO 


1S 





SEQ 0050 



DONE WITH TABLE? 

BRANCH IF NOT 

LOAD ADDRESS OF 4K BANK UNDER TEST 

ADD ADDRESS OFFSET (EITHER 0,2,4, OR 6) 

WRITE WRONG PARITY 

READ WRONG PARITY 



;CLEAR WRITE WRONG PARITY IN ALL 
;PARITY REGISTERS 



; INIT FOR ERROR CHECKS 



BRANCH IF DONE WITH TABLE 

IS THIS REGISTER PRESENT? 

NO, GET NEXT ADDRESS 

YES, DID THIS CONTROLLER GET A 

PARITY ERROR? 

NO, CHECK NEXT 

YES, WHICH 64K IS UNDER TEST? 

BRANCH IF UPPER 64K 

SET BIT IN MAP FOR THIS PARITY REGISTER 

SET BIT IN MAP FOR THIS PARITY REGISTER 

IS THIS THE FIRST ADDRESS FOUND FOR 

THIS PARITY REGISTER? 

MO, BRANCH 

YES, RECORD LOW BYTE OF ADDRESS (0,2, 4, OR 6) 

INDICATE AN ADDRESS HAS BEEN FOuND FOR 

THIS REGISTER 

;CLEAR BAD PARITY 

;CHECK FIRST 4 ADDRESSES IN EACH 4K 

;BRANCH IF FIRST 4 ADDRESSES TESTED 

; IF NOT, GO TEST NEXT ONE 

;1S LOWER MEMORY DONE? 

;YES, BRANCH 

;DONE WITH 1ST 28K? 

; YES, BRANCH 

;N0- ADD 4K TO ADDRESS 

;SHIFT BIT POINTER 

; START WITH FIRST ADDRESS IN BANK 

;DOES THIS 4K BLOCK EXIST? 

; NO- BRANCH 

;YES, TEST IT 

;KT11 PRESENT? 

;YES, BRANCH 

;N0, DONE 

;KT11 ALR-.ADY ON? 

;YES, BRANCH 



1 
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2720 


012660 


012767 


020000 


165656 


2721 


012666 


012767 


001400 


165670 


2722 


012674 


004767 


001012 




2723 


012700 


004767 


001156 




2724 










2725 










2726 


012704 


005067 


166316 




2727 


012710 


012737 


000001 


177572 


2728 


012716 


006367 


165576 




2729 


012722 


10301 1 






2730 


012724 


012767 


000001 


165566 


2731 


012732 


013767 


001066 


165606 


2732 


012740 


012767 


000001 


165604 


2733 


012746 


062767 


000200 


165610 


2734 


012754 


022767 


007600 


165602 


2735 


012762 


003003 






2736 


012764 


005037 


177572 




2737 


012770 


000207 






2738 


012772 


036767 


165522 


165546 


2739 


013000 


001746 






2740 


013002 


016777 


165556 


166242 


2741 


013010 


005067 


166214 




2742 


013014 


000167 


177326 




2743 










2744 










2745 










2746 










2747 










2748 










2749 










2750 


013020 


004767 


000766 




2751 


01 3024 


104000 






2752 


013026 


017074 






2753 


013030 


012701 


000556 




2754 


013034 


062701 


000010 




2755 


013040 


020127 


000766 




2756 


013044 


002136 






2757 


013046 


005067 


165500 




2758 


013052 


005067 


165444 




2759 










2760 


013056 


005067 


165442 




2761 










2762 


013062 


012767 


177774 


165436 


2763 


013070 


016167 


000002 


165420 


2764 


013076 


01 2767 


000001 


165414 


2765 


013104 


03271 1 


000001 




2766 


013110 


001351 






2767 


0131 12 


01 1167 


165376 




2768 


0131 16 


004567 


002274 




2769 


013122 


000514 






2770 


013124 


01 7244 






2771 


013126 


000006 






2772 


013130 


104000 






2773 


013132 


017447 






2774 


013134 


104000 






2775 


013136 


017244 
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MOV 


#20000, TBANK 


MOV 


#1400,RELOC 


JSR 


%7,NRALL 


JSR 


%7,MAP1 


CLR 


KTSTART 


MOV 


#1 ,<?>#SR0 


ASL 


BITPT 


BCC 


2$ 


MOV 


#1 , BITPT 


MOV 


(MMEMH, MEMUT 


MOV 


01 ,HIWORD 


ADD 


#200,REL0C 


CMP 


#7600,RELOC 


BGT 


3$ 


CLR 


@#SR0 


RTS 


%7 


BIT 


BITPT, MEMUT 


BEQ 


1$ 


MOV 


REL0C,@KPAR1 


CLR 


ADRTYP 


JMP 


MAPRB 



ROUTINE TO TYPE MAP OF WHERE PARITY 
AND WHICH CONTROL REGISTERS CONTROL 



JSR 


%7,CLRPAR 


TYPE 




MTMAP 




MOV 


#MPR0-10,R1 


ADD 


#10, R1 


CMP 


R1 ,#TREG 


BGE 


TMAPEX 


CLR 


HIWORD 


CLR 


TRFLG 



MOV 


#-4, TYCOR 


MOV 


2(1 ) ,ADRPT 


MOV 


#1 , BITPT 


BIT 


#1,(1) 


BNE 


TMAPA 


MOV 


(1 ), TEMPX 


JSR 


R5.0ACNV 


TEMPX 




MPRAD 




6 




TYPE 




MX1 




TYPE 




MPRAD 





;N0, INIT TBANK TO SELECT KERNEL PAGE 1 
;SET UP FOR ACCESS TO 28K BANK 
INITIALLY MAP ALL PAGES NR, BANK 
;MAP KERNEL TO BANK 0, RW 
;MAP KERNEL 7 TO THE EXTERNAL BANK, RW 
",SET KERNEL 1 RW AND TURN ON KT11 
{INDICATE KT11 NOW IN USE 

; TURN ON KT1 1 
;SHIFT BANK INDICATOR 
{BRANCH IF FIRST 64K NOT DONE 
;IF FIRST 64K DONE, SETUP FOR 
{SECOND 64K 
{INDICATE NOW TESTING HIGH 64K 

;UP TO EXTERNAL BANK YET? 

{NO, CONTINUE 

{YES, TURN OFF KT11 AND EXIT 

;IS THIS 4K PRESENT? 

{NO- BRANCH 

{YES, MAP PAGE 1 TO THIS BANK 

;G0 TEST FOR PARITY MEMORY 



MEMORY IS PRESENT 
WHICH MEMORY 

{CLEAR ALL PARITY REGISTERS PRESENT 
{TYPE "THE PARITY REGISTERS CONTROL MEMORY 
{AS FOLLOWS:" 
{SET UP POINTER 

{DONE WITH MAP? 
{YES, BRANCH 

{INITIALIZE TRANSITION FLAG (USED TO 
{FiGURE MEMORY LIMITS) 

{INITIALIZE TO INDICATE NOTHING TYPED FOR 
{THIS REGISTER YET 

{GET LOW 64K MEMORY MAP WORD 
{ INITIALIZE 4K POINTER 
{DOES THIS CONTROL EXIST? 
{NO, GET ADDRESS OF NEXT ONE 
{YES, PRINT ITS ADDRESS 
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2776 


013140 


062767 


000004 


165360 TMAPB: 


ADD 


#4, TYCOR 


2777 


013146 


036767 


165346 


165342 


BIT 


BITPT, ADRPT 


2778 


013154 


001424 






BEQ 


TMAPC 


2779 


013156 


005767 


165340 




TST 


TRFLG 


2780 


013162 


001043 






BNE 


TMAPD 


2781 


013164 


012767 


000001 


165330 


MOV 


#1 , TRFLG 


2782 


013172 


004567 


002326 




JSR 


R5.BDCNV 


2783 


013176 


000526 






TYCOR 




2784 


013200 


017144 






MTYCOR 




2785 


013202 


000003 






3 




2786 


013204 


104000 






TYPE 




2787 


013206 


017546 






MX2 




27S8 


013210 


104000 






TYPE 




2789 


013212 


017144 






MTYCOR 




2790 


013214 


104000 






TYPE 




2791 


013216 


017151 






MDASH 




2792 


013220 


005267 


165300 




INC 


TYFLG 


2793 


013224 


000422 






BR 


TMAPD 


2794 


013226 


0C5767 


165270 


TMAPC: 


TST 


TRFLG 


2795 


013232 


001417 






BEQ 


TMAPD 


2796 


013234 


005067 


165262 




CLR 


TRFLG 


2797 


013240 


004567 


002260 




JSR 


R5.BDCNV 


2798 


013244 


000526 






TYCOR 




2799 


013246 


017144 






MTYCOR 




2800 


013250 


000003 






3 




2801 


013252 


104000 






TYPE 




2802 


013254 


01 7144 






MTYCOR 




2803 


013256 


104000 






TYPE 




2804 


013260 


017157 






MK 




2805 


013262 


1054000 






TYPE 




2806 


013264 


017154 






MCR 




2807 


013266 


005267 


165232 




INC 


TYFLG 


2808 


013272 


006367 


165222 


TMAPD: 


ASL 


BITPT 


2809 


013276 


103320 






BCC 


TMAPB 


2810 


013300 


005767 


165246 




TST 


HIWORD 


281 1 


013304 


001405 






BEQ 


1$ 


2812 
2813 
2814 


013306 


005767 


165212 




TST 


TYFLG 














2815 


013312 


001250 






BNE 


TMAPA 


2816 


013314 


104002 






ERROR 




2817 














2818 














2819 














2820 














2821 


013316 


000646 






BR 


TMAPA 


2822 


013320 


016167 


000004 


165170 1$: 


MOV 


4(1 ), ADRPT 


2823 


013326 


012767 


000001 


165164 


MOV 


#1 , BITPT 


2824 


013334 


005267 


165212 




INC 


HIWORD 


2825 


013340 


000677 






BR 


TMAPB 


2826 


013342 


000207 




TMAPEX: 


RTS 


%7 


2827 














2828 








{ROUTINE TO HANDLE 8K SYSTE 


2829 














2830 














2831 


013344 


012767 


000002 


165146 SMLSYS: 


MOV 


#2, BITPT 



{KEEP TRACK OF # OF K OF CORE 

{DOES THIS PARITY REGISTER CONTROL THIS 4K? 

{NO- BRANCH 

;YES, DOES IT CONTROL PREVIOUS 4K? 

{YES- DON'T TYPE IT 

;N0- SET FLAG INDICATING TRANSITION 

{CONVERT K CORE TO ASCII 



{TYPE "CONTROLS", AND ADDRESS OF CORE 



{INDICATE TYPED 

{DID THIS PARITY REGISTER CONTROL PREVIOUS 4K? 
{NO, SKIP PRINTING 

{YES, TRANSITION OCCURRED- CLEAR FLAG 
{CONVERT K CORE TO ASCII 



{TYPE RIGHT AND RETURN 



{INDICATE TYPED 

{UPDATE BIT POINTER TO NEXT 4K 

{TEST NEXT 4K IF NOT DONE WITH 1ST 64K 

{64-124K DONE? 

{NO, BRANCH 

{YES, WAS ANY PARITY MEMORY 

{FOUND FOR THIS REGISTER? 



;N0 PARITY MEMORY WAS FOUND FOR THIS 
{REGISTER- EITHER WRITE WRONG PARITY 
{FAILED, PARITY ERROR GENERATE OR 
{DETECT FAILED, OR THE PARITY ERROR 
{BIT FAILED TO SET 

{UPDATE TO MAP WORD FOR THE UPPER 64K 

{RESET BIT POINTER 

{INDICATE LOW 64K DONE 

{LOOP 

{RETURN WHEN DONE 



{SET UP POINTER FOR BANK 1 
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2832 


013352 


005037 


000042 




2833 


013356 


104000 






2834 


013360 


017466 






2835 


013362 


000207 






2836 










2837 










2838 










2839 










2840 










2841 










2842 










2843 










2844 


013364 


012767 


016517 


000266 E 


284 5 


013372 


012767 


177777 


000262 


2846 


013400 


01 2767 


000240 


000256 


2847 


01 34 06 


01 7767 


165354 


165124 


2848 


013414 


004567 


001776 




2849 


013420 


000766 






2850 


013422 


016526 






2851 


01 3424 


000006 






2852 


013426 


004567 


001764 




2853 


013432 


000540 






2854 


013434 


016550 






2855 


013436 


000006 






2856 


013440 


000461 






2857 










2858 










2859 










2860 










2861 










2862 










2863 










2864 










2865 










2866 


013442 


01 2767 


016517 


000210 E 


2857 










2868 


013450 


012767 


016561 


000204 


2869 


0134 56 


012767 


177777 


000200 


2870 


013464 


01 0567 


165042 




2871 


013470 


017767 


165272 


165042 


2872 


013476 


004567 


001714 




2873 


013502 


0C0766 






2874 


013504 


01 6526 






2875 


013506 


000006 






2876 


013510 


004567 


001702 




2877 


013514 


000540 






2878 


013516 


016550 






2879 


01 3520 


000006 






2880 


013522 


004567 


001670 




2881 


013526 


000532 






2882 


013530 


01 6605 






2883 


01 3532 


000006 






2884 


013534 


004567 


001656 




2885 


013540 


000534 






2886 


013542 


016521 






2887 


013544 


000006 
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CLR @#4 

TYPE 

NOMON 

RTS PC 



SEQ 0053 



;MAKE EXIT STANDALONE 



ERROR HANDLER 



ERROI 

TYPE 

TREG 

ERRST 



RS CALL 

S PC, IC 

SHOULD 

MOV 

MOV 

MOV 

MOV 

JSR 

TREG 

MTREG 



ENTERS HERE 

NT, MPR ADDRESS, AND MPR CONTENTS 

CONTAIN ADDRESS OF PARITY REGISTER 

#MSTR,ERRB ;SETUP TO TYPE MPR ADDRESS AND CONTENTS 

#-1 ,ERRBX 

#240,ERRBX+2 ;NOP LOCATION AFTER MESSAGE 

@TREG, TRDATA ;SETUP DATA 

R5,0ACNV ;CONVERT TO ASCII 



JSR 
TRDATA 

MDATA 



;CONVERT TO ASCII 



ERRORP CALL ENTERS HERE 

TYPES PC, ICNT, MFR ADDRESS, MPR CONTENTS 

TEST LOCATION ADDRESS, VALUE EXPECTED, VALUE FOUND 

R5 MUST CONTAIN ADDRESS OF TEST LOCATION 

SHDBE MUST CONTAIN EXPECTED VALUE 

WAS MUST CONTAIN ACTUAL DATA 

TREG MUST CONTAIN ADDRESS OF PARITY REGISTER 



ERRP: 



MOV 


#MSTR,ERRB 


MOV 


#MSTRX, ERRBX 


MOV 


#-1 ,ERRBX+2 


MOV 


R5, TSTLOC 


MOV 


@TREG, TRDATA 


JSR 


R5.0ACNV 


TREG 




MTREG 




6 




JSR 


R5.0ACNV 


TRDATA 




MDATA 




6 




JSR 


R5.0ACNV 


TSTLOC 




MSTRX1 




6 




JSR 


R5.0ACNV 


SHDBE 




MSTRX3 





;IN ADDITION TO BASIC PRINTOUT, TYPE 

;MPR ADDRESS AND CONTENTS 

;ALSO OUTPUT DATA EXPECTED AND ACTUAL 

;NOP LOCATION AFTER MESSAGE 

;STORE ADDRESS BEING TESTED 
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SEO 0054 



2888 


013546 


004567 


001644 






JSR 


R5.0ACNV 


2889 


013552 


000536 








WAS 




2890 


013554 


016635 








MSTRX5 




2891 


013556 


000006 








6 




2892 


013560 


00041 1 








BR 


ERRA 


2893 
















2894 
















2895 
















2896 










;ERROR 


CALL ENTERS HERE 


2897 










:TYPE 


PC AND ICNT ONLY 


2898 


013562 


01 2767 


177777 


000070 


ERR: 


MOV 


#-1 ,ERRB 


2899 


013570 


01 2767 


000240 


000064 




MOV 


#240, ERRBX 


2900 


013576 


012767 


000240 


000060 




MOV 


A240.ERRBX+2 


2901 


013604 


032777 


020000 


165266 


ERRA: 


BIT 


#BIT13,@SWR 


2902 


013612 


001025 








BNE 


ERRC 


2903 


013614 


01 1667 


000070 






MOV 


(SP) ,ERRD 


2904 


013620 


152767 


000002 


000062 




SUB 


#2, ERRD 


2905 


013626 


004567 


001564 






JSR 


R5.0ACNV 


2906 


013532 


013710 






ERRA1 : 


ERRD 




2907 


013634 


016472 






ERRA2: 


MPC 




2908 


013636 


C00006 








6 




2909 


013640 


004567 


001552 






JSR 


R5.0ACNV 


2910 


013644 


016460 






ERRA3: 


ICNT 




291 1 


013646 


016510 






ERRA4: 


MICNT 




2912 


013650 


000006 








6 




2913 


013652 


004567 


001506 






JSR 


R5.TYPSX 


2914 


013656 


016464 






ERRA5: 


MEO 




2915 


013660 


000000 






ERRB: 


OPEN 




2916 


013662 


000000 






ERRBX: 


OPEN 




2917 


013664 


177777 








_< 




2918 


013666 


023737 


000042 


000046 


ERRC: 


CMP 


@#42,@#46 


2919 


013674 


001403 








BEO 


. + 10 


2920 


013676 


005777 


165176 






TST 


@SWR 


2921 


013702 


100001 








BPL 


.+4 


2922 


013704 


000000 








HALT 




2923 


013706 


000002 








RTI 




2924 
2325 
2926 


013710 


000000 






ERRD: 


OPEN 


















2927 
















2928 










;MAP ALL PAGES 


NON-RESIDENT, 


2929 


013712 


01 3746 


000004 




NRALL: 


MOV 


@#4,-(SP) 


2930 


013716 


013746 


000006 






MOV 


@#6,-(SP) 


293V 


013722 


01 2737 


000006 


000004 




MOV 


#6,@>#4 


2932 


013730 


012737 


000002 


000006 




MOV 


#RTI,@#6 


2933 


013736 


01 0146 








MOV 


R1 ,-(SP) 


2934 


013740 


010246 








MOV 


R2,-(SP) 


2935 


013742 


01 0346 








MOV 


R3,-(SP) 


2936 


0'13744 


012701 


001232 






MOV 


#PDRTAB,R1 


2937 


013750 


012703 


000040 




1$: 


MOV 


#32. ,R3 


2938 


013754 


012102 








MOV 


(R1 )+,R2 


2939 


013756 


005022 






2$: 


CLR 


(R2) + 


2940 


013760 


005303 








DEC 


R3 


2941 


013762 


001375 








BNE 


2$ 


2942 


013764 


020127 


001236 






CMP 


R1 ,#PDREND 


2943 


013770 


003767 








BLE 


1$ 



;SET UP ONE MESSAGE CALL 



;INHIBIT ERROR PRINT? 

;YES- BRANCH 

;N0- DEVELOP CALLING ADDRESS 

:G0 TO OCTAL TO ASCII CONVERT 
;SOURCE ADDRESS 
;DESTINATION ADDRESS 
;#0F DIGITS TO CONVERT 
;CONVERT ICNT TO ASCII 



;TYPE MESSAGE 
; ERROR HEADER 
-.ADDITIONAL ERROR MESSAGES IF ANY 



;ARE WE IN ACT11 AUTOMATIC MODE? 

;YES, HALT ON ERROR 

;HALT ON ERROR SET? 

;N0- BRANCH 

;YES- ERRuR OCCURRED SO HALT 



CCMFAFO, MEMORY PARITY TEST 
CCMFAF.P11 13-JAN-78 12:13 



MACY11 30A(1052; 



2944 

2945 

2946 

2947 

2948 

2949 

2950 

2951 

2952 

2953 

2954 

2955 

2956 

2957 

2958 

2959 

2960 

2961 

2962 

2963 

2964 

2965 

2966 

2967 

2968 

2969 

2970 

2971 

2972 

2973 

2974 

2975 

2976 

2977 

2978 

2979 

2980 

2981 

2982 

2983 

2984 

2985 

2986 

2987 

2938 

2989 

2990 

2991 

2992 

2993 

2994 

2995 

2996 

2997 

2998 

2999 



013772 
013774 

013776 
014000 
014004 
014010 



014012 
01401 4 
014016 
014020 
014024 
014026 
014032 
014036 
014040 
014044 
014050 
014052 
014054 
014056 
014060 



014062 
014070 
014076 
0141 04 
0141 12 
0141 16 
014124 



0141 26 
0141 30 
014134 
01 41 40 
014144 
014146 
014152 



012603 
012602 
01 2601 
012637 
012637 
000207 



010146 
01 0246 
010701 
062701 
010702 
062702 
03271 1 
001002 
005071 
062701 
020102 
103767 
01 2602 
012601 
000207 



012777 
012777 
012777 
012777 
0C5077 
012737 
000207 



01 0246 
012702 
012701 
005767 
001403 
022701 
.01420 



000006 
000004 



164740 
000001 



000000 
000010 



077406 
077406 
077406 
007600 
165132 
000001 



000200 
000002 
164404 
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MOV (SP)+,R3 




MOV (SP)+,R2 




MOV (SP)+,R1 




MOV (SP)+,0#6 




MOV (SP)+,@#4 





;R0UTINE TO CLEAR ALL PARITY REGISTERS PRESENT 



CLRPAR: 


MOV 


R1 ,-(SP) 




MOV 


R2,-(SP) 




MOV 


PC.R1 




ADD 


#MPRO~. ,R1 




MOV 


PC.R2 




ADD 


#TREG~. ,R2 


1$: 


BIT 


#1 ,@R1 




BNE 


.+6 




CLR 


@(R1 ) 




ADD 


#10, R1 




CMP 


R1 ,R2 




BLO 


1$ 




MOV 


(SP)+,R2 




MOV 


(SP)+,R1 




RTS 


%7 



;IS THIS REGISTER PRESENT? 
;CLEAR ALL PARITY REGISTERS 



165150 
165144 
165142 
165144 

177572 



;ROUTINE TO MAP KERNEL TO BANK READ/WRITE. 

;KERNEL 1 READ/WRITE BUT BANK MAPPED BY CALLING ROUTINE, 

;AND KERNEL 7 TO EXTERNAL BANK, READ/WRITE 

MAPI: MOV #77406, ^KPDRO 

MOV #77406, @KPDR1 

MOV #77406, @KPDR7 

MOV #7600,(SKPAR7 

CLR @KPARO 

MOV #1,@>#SR0 

RTS %7 



;ROUTIN 
ICORRES 
;MAPMEM 
;T0 USE 
;T0 MAP 
;KT11 I 
LOCATM: 



E TO LOCATE THE FIRST PARITY MEMORY ADDRESS (ABOVE BANK 0) 
PONDING TO A GIVEN PARITY REGISTER-REQUIRES THAT THE ROUTINES 

AND MAPREG HAVE ALREADY BEEN RUN 
PUT THE ADDRESS OF THE ADDRESS OF THE REGISTER IN RO (I.E. POINT TO 

TABLE)-THE DESIRED ADDRESS IS RETURNED IN R1, USING KERNEL PAGE 1 IF 
S PRESENT 



014154 030160 000002 



MOV 
MOV 
MOV 
TST 
BEO 
CMP 
BLOS 

BIT 



R2,-(SP) 

#2C0,R2 

#2,R1 

NOKT 

3S 

#200, R1 

4$ 

R1 ,2(R0) 



;SKIP USE OF BANK 

;KT11 PRESENT? 

;YES, BRANCH 

;N0, CHECK ONLY FOR MEMORY IN FIRST 28K 

;IF NO MEMORY FOUND IN 1ST 28K, GIVE 

;ERROR RETURN 

;DOES THIS 4K CORRESPOND TO THIS REGISTER? 



CCMFAFO, MEMORY PARITY TEST 
CCMFAF.P11 13-UAN-78 12:13 



MACY11 30A(1052) 



3000 


014160 


001021 




3001 


014162 


062702 


000200 


3002 


014166 


006301 




3003 


014170 


103363 




3004 


014172 


012701 


000001 


3005 


014176 


030160 


000004 


3006 


014202 


00101 




3007 


014204 


062702 


000200 


3008 


014210 


006301 




3009 


014212 


103371 




3010 


014214 


012701 


000001 


3011 


014220 


01 2602 




3012 


014222 


000207 




3013 


014224 


005767 


164320 


3014 


014230 


001005 




3015 


014232 


010277 


165014 


3016 


014236 


01 2701 


020000 


3017 


014242 


000407 




3018 


014244 


010201 




3019 


014246 


006301 




3020 


014250 


006301 




3021 


014252 


006301 




3022 


014254 


0C6301 




3023 


014256 


006301 




3024 


014260 


006301 




3025 


014262 


1 16067 


000006 000010 


3026 


014270 


066701 


000004 


3027 


014274 


012602 




3028 


014276 


000207 




3029 


014300 


000000 




3030 








3031 








3032 








3033 








3034 


014302 


013746 


000004 


3035 


014306 


01 3746 


000006 


3036 


014312 


012737 


000006 000004 


3037 


014320 


012737 


000002 000006 


3038 


014326 


01 0146 




3039 


014330 


01 0246 




3040 


014332 


01 2701 


152234 


3041 


014336 


000261 




3042 


014340 


00571 1 




3043 


014342 


103006 




3044 


014344 


162701 


020000 


3045 


014350 


020127 


020000 


3046 


014354 


101370 




3047 


014356 


000410 




3048 


014360 


012702 


032234 


3049 


014364 


012122 




3050 


014366 


020227 


040000 


3051 


014372 


103774 




3052 


014374 


005267 


000016 


3053 








3054 


014400 


012602 




3055 


014402 


012601 
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BNE 


L0CAT1 




ADD 


#200, R2 




ASL 


R1 




BCC 


1$ 




MOV 


#1 ,R1 




BIT 


R1 ,4(R0) 




BNE 


L0CAT1 




ADD 


#200, R2 




ASL 


R1 




BCC 


2$ 




MOV 


#1 ,R1 




MOV 


(SP)+,R2 




RTS 


%7 




TST 


NOKT 




BNE 


1$ 




MOV 


R2,@KPAR1 




MOV 


#20000, R1 




BR 


2$ 




MOV 


R2.R1 




ASL 


R1 




ASL 


R1 




ASL 


R1 




ASL 


R1 




ASL 


R1 




ASL 


R1 




MOVB 


6(R0) , LSAV 




ADU 


LSAV.R1 




MOV 


(SP)+,R2 




RTS 


%7 












;SAVE LOADER IN TOP OF FIRST 4K 



SAVLDR: 


MOV 


@#4,-(SP) 




MOV 


@#6,-(SP) 




MOV 


#6,@#4 




MOV 


#RTI,<a#6 




MOV 


R1 ,-(SP) 




MOV 


R2,-(SP) 




MOV 


#152234, R1 


1$: 


SEC 






TST 


0R1 




BCC 


2$ 




SUB 


#20000, R1 




CMP 


R1 ,#20000 




BHI 


1$ 




BR 


SAVLDX 


2$: 


MOV 


#32234, R2 


3$: 


MOV 


(R1) + ,(R2)- 




CMP 


R2, #40000 




BLO 


3$ 




INC 


LDRSVD 


SAVLDX: 


MOV 


(SP)+,R2 




MOV 


(SP)+,R1 



;YES, BRANCH 

;N0. CHECK TO SEE IF NEXT 4K CORRESPONDS 



;CHECK HIGH 64K 



;N0 PARITY MEMORY CORRESPONDS TO 

;THIS REGISTER- RETURN WITH ERROP 

; INDICATION 

; KT1 1 PRESENT? 

;N0- BRANCH OVER 

;YES- SETUP R1 TO REFERENCE 4K 

;BANK USING KERNEL PAGE 1 

;SETUP R1 TO REFERENCE 4K BANK 
;WITHOUT KT11 



;RESTORE R2 
;AND RETURN 



;SAVE CONTENTS OF TIMEOUT VECTOR 



;SETUP TO RTI ON TIMEOUT 
;SAVE REGISTERS 



;IF TIMEOUT, C BIT WILL STILL BE SET 

;IF NO TIMEOUT, C BIT WILL BE CLEAR 

;TIMEOUT OCCURRED, CHECK FOR NEXT LOWER BANK 



;ONLY 4K OF 1ST 28K PRESENT- EXIT 
;THIS BANK IS HIGHEST OF 1ST 28K- COPY 
; LOADER AREA TO BANK 



; INDICATE LOADER HAS BEEN MOVED TO 
;THE TOP OF THE FIRST 4K 



CCMFAFO, MEMORY PARITY TEST 
CCMFAF.P11 13-JAN-78 12:13 
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3056 
3057 
3058 
3059 
3060 
3061 
3062 
3063 
3064 
3065 
3066 
3067 
3068 
3069 
3070 
3071 
3072 
3073 
3074 
3075 
3076 
3077 
3078 
3079 
3080 
3081 
3082 
3083 
3084 
3085 
3086 
3087 
3088 
3089 
3090 
3091 
3092 
3093 
3094 
3095 
3096 
3097 
3098 
3099 
3100 
3101 
3102 
3103 
3104 
3105 
3106 
3107 
3108 
3109 
3110 
31 11 



014404 012637 000006 

014410 012637 000004 

014414 000207 

014416 000000 



014420 
014424 
014426 
014434 
014442 
014446 
014450 
014452 
014454 
014460 
014464 
014466 
014470 
014474 
014476 
014502 
014504 
014506 
014510 
014512 



014514 

014516 
014520 
1 4522 
014524 
014530 
014534 
014540 
014544 
014552 
014556 
014564 
014570 
014574 
014576 
014600 
014604 
014610 
014612 
014614 



005767 
001431 
012737 
012737 
01 2701 
000261 
00571 1 
103006 
162701 
020127 
101370 
000410 
012702 
012221 
020227 
103774 
104000 
017560 
000207 
000776 



01 0146 

010246 
01 0346 
01 0446 
01 3746 
01 3746 
01 3746 
013746 
012737 
005037 
01 2737 
005037 
005767 
001513 
005002 
012703 
004767 
005712 
000240 
01 2701 



000006 
000002 
152234 



020000 
020000 



MOV 
MOV 
RTS 



(SP)+ f 0#6 
(SP) + ,fi>#4 
%7 



;ROUTINE TO RESTORE THE LOADER FROM BANK 
-.HIGHEST BANK IN THE FIRST 28K OF MEMORY 



(WHERE IT WAS SAVED) TO THE 



000004 
000006 



2$: 
3S: 



TST 

BEO 

MOV 

MOV 

MOV 

SEC 

TST 

BCC 

SUB 

CMP 

BHI 

BR 

MOV 

MOV 

CMP 

BLO 

TYPE 

LDRMSG 

RTS 

BR 



LDRSVD 
RSTLDX 
#6,@#4 
#RTI ,©#6 
#152234, Rl 

@R1 

2S 

#20000, R1 

R1 ,#20000 

1$ 

RSTLDX 

#32234, R2 

(R2)+, (R1) + 

R2, #40000 

3$ 



;IF TIMEOUT, C 
;IF NO TIMEOUT 
;TIMEOUT OCCURRED 
; LOWER BANK 



BIT WILL BE SET 
C BIT WILL BE CLEAR 
CHECK FOR NEXT 



;SCAN ALL MEMORY FOR BAD PARITY 
; LOCATIONS FOUND TO BE BAD, AND 



014620 032711 



000004 
000006 
0001 14 
0001 16 
000006 
000006 
000116 
0001 16 
163754 



000001 
177202 



000566 
000001 



MOV 


R1 ,-(SP) 


MQV 


R2,-(SP). 


MOV 


R3,-(SP) 


MOV 


R4,-(SP) 


MOV 


@#4,-(SP) 


MOV 


<a#6,-(SP) 


MOV 


is#114,-(SP) 


MOV 


§>#116,-(SP) 


MOV 


#6,@#4 


CLR 


<p>#6 


MOV 


#1 16,@#1 14 


CLR 


@# 1 1 6 


TST 


NOKT 


BEO 


PSCAN1 


CLR 


R2 


MOV 


#1 ,R3 


JSR 


%7,CLRPAR 


TST 


<°>R2 


NOP 




MOV 


#MPR0,R1 


BIT 


#1 ,@R1 



-.TYPE MESSAGE "LOADER RESTORED" 



; LOADER HAS BEEN RESTORED 
;T0 HIGHEST BANK IN FIRST 28K 



, TYPE 18 BIT ADDRESSES OF 
WRITE INTO LOCATIONS WITH GOOD PARITY 

; STORE REGISTERS AND LOCATIONS TO BE 

;ALTERRED 



-.SETUP TIMEOUT TRAPCATCHER 

;SETUP PARITY TRAP TRAPCATCHER 

KT11 PRESENT? 

YES, BRANCH 

R2 CONTAINS TEST ADDRESS 

R3 USED AS A BIT POINTER 

CLEAR ALL PARITY REGISTERS 

READ LOCATION TO CHECK FOR BAD PARITY 

;SETUP TO SCAN REGISTERS FOR PARITY 
;ERROR SET 



CCMFAFO, MEMORY PARITY TEST 
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31 12 


014624 


001003 




31 13 


014626 


005771 


000000 


31 14 


014632 


100424 




31 15 


014634 


062701 


000010 


31 16 


014640 


020127 


000766 


3117 


014644 


103765 




31 18 


014646 


062702 


000002 


3119 


014652 


032702 


017777 


3120 


014656 


001352 




3121 


014660 


006303 




3122 


014662 


020327 


000200 


3123 


014666 


103035 




3124 


014670 


030367 


164170 


3125 


014674 


00 1343 




3126 


014676 


062702 


020000 


3127 


014702 


000766 




3128 


014704 


010267 


000110 


3129 


014710 


004567 


000502 


3130 


014714 


015020 




3131 


014716 


017440 




3132 


014720 


000006 




3133 


014722 


104000 




3134 


014724 


01 7410 




3135 


014726 


032777 


002000 164144 


3136 


014734 


001401 




3137 


014736 


000000 




3138 


014740 


011212 




3139 








3140 


014742 


005071 


000000 


3141 


014746 


005712 




3142 


014750 


005771 


000000 


3143 


014754 


100001 




3144 


014756 


104002 




3145 








3146 


014760 


000732 




3147 


014762 


004767 


177024 


3148 


014766 


012637 


0001 16 


3149 


014772 


012637 


0001 14 


3150 


014776 


012637 


000006 


3151 


015002 


012637 


000004 


3152 


015006 


012604 




3153 


015010 


012603 




3154 


015012 


01 2602 




3155 


.01 5014 


012601 




3156 


"015016 


000207 




3157 


015020 


000000 




3158 


015022 


000000 




3159 








3160 








3161 








3162 








3163 








3164 


015024 


017746 


164222 


3165 


015030 


032737 


000001 177572 


3166 


015036 


001004 




3167 


015040 


004767 


176646 



J0A(1C5; 


) 13-JAN-78 12:27 




BNE 


. + 10 




TST 


<?>(R1 ) 




BMI 


6$ 




ADD 


#10, R1 




CMP 


R1 ,#TREG 




BLO 


3$ 


4$: 


ADD 


#2,R2 




BIT 


#17777, R2 




BNE 


1$ 


5$: 


ASL 


R3 




CMP 


R3,#200 




BHIS 


PSCANX 




BIT 


R3.MEML 




BNE 


1$ 




ADD 


#20000, R2 




BR 


5$ 


6S: 


MOV 


R2, PSADRS 




JSR 


R5.0ACNV 




PSADRS 






MPSER1 






6 






TYPE 






MPSER 






BIT 


#2000, @SWR 




BEO 


.+4 




HALT 






MOV 


@R2,@R2 




CLR 


@(R1) 




TST 


@R2 




TST 


<P(R1 ) 




BPL 


.+4 




ERROR 






BR 


4$ 


PSCANX: 


JSR 


PC.CLRPAR 




MOV 


(SP)+,@#1 16 




MOV 


(SP) + ,<P#1 14 




MOV 


(SP)+,@#6 




MOV 


(SP) + ,@s#4 




MOV 


(SP)+,R4 




MOV 


(SP)+,R3 




MOV 


(SP)+,R2 




MOV 


(SP)+,R1 




RTS 


%7 


PSADRS: 







PSCANH: 








SEQ 0058 



PARITY ERROR SET? 

YES- BRANCH 

NO- CHECK NEXT REGISTER 

;LOOP UNTIL ALL REGISTERS HAVE BEEN CHECKED 

;MOVE ADDRESS POINTER 

; DONE WITH 4K? 

;N0. CONTINUE 

;YES, CHECK FOR TESTING NEXT 4K 

EXIT IF DONE WITH 28K 

IS THIS MEMORY PRESENT? 

YES, GO TEST IT 

NO, UPDA E ADDRESS 

LOOP 

PARITY ERROR OCCURRED 

GET ASCII OF ADDRESS CONTAINING BAD PARITY 



TYPE MESSAGE "BAD PARITY FOUND IN LOCATION" 

AND ADDRESS OF FAILING LOCATION 

SWITCH 10 SET? 

NO- CONTINUE 

HALT ON BAD PARITY SET 

WRITE INTO LOCATION- SHOULD 

CLEAR BAD PARITY 

CLEAR CORRESPONDING PARITY REGISTER 

READ LOCATION TO SEE IF BAD PARITY WAS 

CLEARED 

OK- BRANCH 

BAD PARITY DIDN'T CLEAR WHEN LOCATION 

WAS REWRITTEN 

GO CHECK NEXT LOCATION 

DONE- CLEAR ALL PARITY REGISTERS 

RESTORE LOCATIONS ALTERRED 



;SCAN ALL MEMORY FOR BAD PARITY USING KT11 

;TYPE 18 BIT ADDRESSES OF LOCATIONS FOUND BAD, AND WRITE GOOD PARITY BACK IN 

PSCAN1: MOV @KPAR1,-(SP) ;SAVE CONTENTS OF KERNEL PARI 

;SKIP IF KT11 IS ALREADY ON 

;MAP KERNEL TO BANK , RW 



BIT 


#1 


©#SRO 


BNE 


1$ 




JSR 


PC 


NRALL 



MFAFO 


, MEMORY 


PARITY 


TEST 
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3168 


015044 


004767 


177012 




JSR 


PC, MAPI 




3169 
















3170 


015050 


005067 


177746 


1$: 


CLR 


PSCANH 




3171 


015054 


005077 


164172 




CLR 


@KPAR1 




3172 


015060 


012703 


000001 


PSLOOP: 


MOV 


#1 ,R3 




3173 


015064 


005767 


177732 


PSLUP: 


TST 


PSCANH 




3174 


015070 


001004 






BNE 


2$ 




3175 


015072 


030367 


163766 




BIT 


R3.MEML 




3176 


015076 


001022 






BNE 


PSXTST 




3177 


015100 


000403 






BR 


PSNXT 




3178 


015102 


030367 


163760 


2$: 


BIT 


R3.MEMH 




3179 


015106 


001016 






BNE 


PSXTST 




3180 


0151 10 


062777 


000200 


164134 PSNXT: 


ADD 


#200,@KPAR1 




3181 


0151 16 


006303 






ASL 


R3 




3182 


015120 


103361 






BCC 


PSLUP 




3183 


015122 


005767 


177674 




TST 


PSCANH 




3184 


015126 


001003 






BNE 


PSCX1 




3185 


015130 


005267 


177666 




INC 


PSCANH 




3186 
















3187 


015134 


000751 






BR 


PSLOOP 




3188 


015136 


012677 


164110 


PSCX1 : 


MOV 


(SP)+,@KPAR1 




3189 


015142 


000707 






BR 


PSCANX 




3190 


015144 


012702 


020000 


PSXTST: 


MOV 


#20000, R2 


; 


3191 


015150 


004767 


176636 


1$: 


JSR 


%7,CLRPAR 


; 


3192 


015154 


005712 






TST 


@R2 


; 


3193 


015156 


012701 


000566 




MOV 


#MPR0,R1 


; 


3194 


015162 


032711 


000001 


2$: 


BI i 


#1 ,@R1 




3195 


015166 


001003 






BNE 


. + 10 




3196 


015170 


005771 


000000 




TST 


@(R1 ) 


; 


3197 


015174 


100413 






BMI 


4$ 




3198 


0151 76 


062701 


000010 




ADD 


#10, R1 




3199 


015202 


020127 


000766 




CMP 


R1 ,#TREG 




3200 


015206 


103765 






BLO 


2$ 




3201 


015210 


062702 


000002 


3$: 


ADD 


#2,R2 




3202 


015214 


020227 


040000 




CMP 


R2, #40000 


; 


3203 


015220 


103753 






BLO 


1$ 




3204 


015222 


000732 






BR 


PSNXT 


; 


3205 


015224 


010267 


177570 


4$: 


MOV 


R2, PSADRS 


; 


3206 


015230 


042767 


160000 


177562 


BIC 


#160000, PSADRS 


; 


3207 


015236 


005046 






CLR 


~(SP) 




3208 


015240 


017746 


164006 




MOV 


@KPAR1 ,-(SP) 




3209 


015244 


006316 






ASL 


@SP 




3210 


015246 


006316 






ASL 


@SP 




3211 


015250 


006316 






ASL 


@>SP 




.3212 


015252 


006316 






ASL 


@SP 




3213 


015254 


006316 






ASL 


@SP 




3214 


015256 


006166 


000002 




ROL 


2(SP) 




3215 


015262 


006316 






ASL 


@SP 




3216 


015254 


006166 


000002 




ROL 


2(SP) 




3217 


015270 


006366 


000002 




ASL 


2(SP) 




3218 


015274 


062667 


177520 




ADD 


(SP)+, PSADRS 




3219 


015300 


004567 


0001 12 




JSR 


R5.0ACNV 


; 


3220 


015304 


015020 






PSADRS 






3221 


015306 


017440 






MPSER1 






3222 


015310 


000006 






6 






3223 


015312 


116704 


002122 




MOVB 


MPSER1 ,R4 





MAP KERNEL 7 TO THE EXTERNAL BANK, RW 

MAP KERNEL 1 RW , AND TURN ON KT11 

CLEAR FLAG TO INDICATE CHECKING FIRST 64K 

INITIALIZE TO BANK 

R3 IS USED AS A BIT POINTER 

TESTING TOP 64K? 

YES, BRANCH 

NO, IS PARITY MEMORY PRESENT IN THIS 4K? 

YES- GO TEST IT 

NO- CHECK FOR NEXT 4K 

IS PARITY MEMORY PRESENT IN THIS 4K? 

YES- GO TEST IT 

NO- MAP TO NEXT 4K 

BRANCH IF NOT END OF 64K 

END OF TOP 64K? 

YES, GET READY TO EXIT 

NO, SET FLAG INDICATING DONE WITH 

LOWER 64K 



R2 USED AS ADDRESS POINTER 

CLEAR ALL PARITY REGISTERS 

READ LOCATION 

SETUP TO SCAN REGISTERS FOR PARITY ERROR SET 



PARITY ERROR SET? 
YES, BRANCH 
NO, CHECK NEXT 

LOOP UNTIL ALL REGISTERS HAVE BEEN CHECKED 

UPDATE TEST ADDRESS POINTER 

DONE WITH BANK? 

NO- LOOP 

YES- GO CHECK FOR ANOTHER BANK 

PARITY ERROR OCCURRED- GET 18 BIT 

OCTAL ADDRESS OF BAD LOCATION 



CONVERT LOW 16 OCTAL BITS TO ASCII 



CCMFAFO, MEMORY PARITY TEST 
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3224 
3225 
3226 
3227 
3228 
3229 
3230 
3231 
3232 
3233 
3234 
3235 
3236 
3237 
3238 
3239 
3240 
3241 
3242 
3243 
3244 
3245 
3246 
3247 
3248 
3249 
3250 
3251 
3252 
3253 
3254 
3255 
3256 
3257 
3258 
3259 
3260 
3261 
3262 
3263 
3264 
3265 
3 266 
3267 
3268 
3269 
3270 
3271 
3272 
3273 
3274 
3275 
3276 
3277 
3278 
3279 



015316 
015320 
015324 
015326 
015330 
015336 
015340 
015342 
015344 
015350 
015352 
015356 
015360 
015362 



015364 
015370 
015376 
015400 
015402 
015406 
015412 
015414 



015416 
015422 
015426 
015432 
015440 
015444 
0154 50 
015454 
015460 
015464 
015472 
015476 
015502 
015506 
015512 
015514 
015516 
015520 
015522 



062604 
110467 
104000 
017410 
032777 
001401 
000000 
011212 
005071 
005712 
005771 
100001 
104002 
000712 



012567 
022767 
001001 
000205 
013746 
004767 
000000 
000763 



013567 
012567 
012567 
066767 
016746 
042716 
062716 
005367 
1 12677 
042767 
006067 
006067 
006067 
005367 
001352 
000205 
000000 
000000 
000000 



002000 163542 



000022 
177777 



177776 
163502 



000074 
000072 
000070 
000064 
000052 
177770 
000060 
000040 
000034 
000007 
000020 
000014 
000010 
000010 



13-JAN-78 12:27 
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ADD 


(SP)+,R4 




MOVB 


R4.MPSER1 




TYPE 






MPSER 






BIT 


#2000, @SWR 




BEC 


.+4 




HALT 






MOV 


@R2.@R2 




CLR 


@(R1) 




TST 


@R2 




TST 


@(R1) 




BPL 


.+4 




ERROR 






BR 


3$ 





SEO 0060 



;CHANGE TO ASCII FOR 18 BITS 

;TYPE ADDRESS OF LOCATION WITH BAD PARITY 

;SWITCH 10 SET? 

;N0- BRANCH 

;HALT ON BAD PARITY SET 

;REWRITE LOCATION CONTAINING BAD PARITY 

;CLEAR PARITY ERROR BIT 

;READ LOCATION TO SEE IF PARITY IS NOW GOOD 

;CHECK PARITY ERROR BIT 

;REWRITING LOCATION DID NOT CLEAP BAD PARITY 
;G0 TEST NEXT LOCATION 



;PIC ROUTINE TO OUTPUT A SERIES OF ASCII MESSAGES (CALLED VIA JSR R5) 



TYPSX: MOV 
CMP 
BNE 
RTS 

TYPSAX: MOV 
JSR 

TYPS'X: OPEN 
BR 



(R5)+,TYPSBX 

#-1 ,TYPSBX 

TYPSAX 

%5 

@#PS,-(SP) 

PC.STYPE 

TYPSX 



;GET ADDRESS OF MESSAGE 

;TERMINATOR? 

;N0. BRANCH 

;YES, RETURN 

;SETUP TO CALL TYPE ROUTINE VIA JSR 

;TYPE ASCII MESSAGE 



;SUBROUTINE FOR OCTAL TO ASCII CONVERSION 



015524 104005 

015526 012700 015702 



OACNV: MOV 
MOV 
MOV 
ADD 

OACNVA: MOV 
BIC 
ADD 
DEC 
MOVB 
BIC 
ROR 
ROR 
ROR 
DEC 
BNE 
RTS 

OACNVX: OPEN 

OACDST: 

OACNT: 



;SUBROUTINE FOR BINARY TO DECIMAL ASCII CONVERSION 
BDCNV: SAV04 ;SAVE REGS 

MOV #DECVAL,%G ;SET UP ADDR TO STORE DECIMAL ASCII 



@(5)+, OACNVX 

(5)+, OACDST 

(5)+, OACNT 

OACNT, OACDST 

OACNVX, -.(SP) 

#177770, @SP 

#60,@SP 

OACDST 

(SP)+,@OACDST 

#7,0ACNVX 

OACNVX 

OACNVX 

OACNVX 

OACNT 

OACNVA 

R5 



;GET OCTAL VALUE 

;GET DESTINATION ADDRESS 

;GET CONVFRT COUNT 

IDEVELOP ADDRESS TO STORE 1ST CHAR. 

;ISOLATE LEAST SIGNIFICANT DIGIT 
JCONVERT DIGIT TO ASCII 

; STORE ASCII CHARACTER 



;DONE ALL DIGITS? 
; BRANCH IF NOT DONE 
;DONE, EXIT 



CCMFAFO, MEMORY PARITY TEST 
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3280 
3281 
3282 
3283 
3284 
3285 
3286 
3287 
3288 
3289 
3290 
3291 
3292 
3293 
3294 
3295 
3296 
3297 
3298 
3299 
3300 
3301 
3302 
3303 
3304 
3305 
3306 
3307 
3308 
3309 
3310 
331 1 
3312 
3313 
3314 
3315 
3316 
3317 
3318 
3319 
3320 
3321 
3322 
3323 
3324 
3325 
3326 
3327 
3328 
3329 
3330 
3331 
3332 
3333 
3334 
3335 



015532 

015534 
015540 
015544 
015550 
015556 
015562 
015566 
015572 
015574 
015600 
015604 
015610 
015612 
015614 
015616 
015620 
015622 
015626 
015632 
015634 
015640 
015642 
015646 
015654 
015660 
015662 
015664 
015666 
015670 
015672 
015674 
015676 
015700 
015702 
015705 



015710 
015712 
015714 
015716 
015720 
015722 
015724 
015726 
015730 



013501 
012567 
012567 
01 2702 
012767 
012267 
004767 
005367 
001371 
166700 
01 0067 
004567 
000000 
000000 

ocoooo 

104006 
000205 
005067 
166701 
103403 
005267 
000772 
066701 
062767 
1 16720 
000207 
OCOOOO 
000000 
000000 
023420 
001750 
000144 
000012 
000001 
040 
040 



104005 

01 2501 

01 2502 
012503 
1 1 2122 
005303 
001375 
104006 
000205 



000052 
000050 
015670 
000005 
000104 
000034 
000070 

000014 
000004 
000100 



000036 
000034 



000020 
000060 
000004 



040 
040 



BDCNVB: 
BDCNVC: 
BDCNVD: 



SUBTEN: 

subtna; 



CNVCTR: 
DIGIT: 
TENPWR: 
ADTENP: 



040 
040 



0(5)+, R1 

(5)+, BDCNVC 
(5)+, BDCNVD 
0ADTENP.R2 
#5, CNVCTR 
(2)+, TENPWR 
PC, SUBTEN 
CNVCTR 
BDCNVA 
BDCNVD, %0 
560, BDCNVB 
R5.BM0VE 



R5 

DIGIT 

TENPWR, R1 

SUBTNB 

DIGIT 

SUBTNA 

TENPWR, R1 

#60, DIGIT 

DIGIT, (0)+ 

PC 



MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

JSR 

DEC 

BNE 

SUB 

MOV 

JSR 

OPEN 

OPEN 

OPEN 

RST04 

RTS 

CLR 

SUB 

BCS 

INC 

BR 

ADD 

ADD 

MOVB 

RTS 

OPEN 

OPEN 

OPEN 

10000. 

1000. 

100. 

10. 



DECVAL: .BYTE 040,040,040,040,040,040 



;SUBROUTINE TO MOVE A VARIABLE NUMBER OF BYTES 



;BINARY VALUE TO R1 
DESTINATION ADDR TO BDCNVC 
;CHARACTER COUNT TO BDCNVD 
;ADDR OF TEN POWER STRING 
;SET UP FOR 5 POWER CONVERSIONS 
;MOVE POWER OF TEN VALUE 
;PERFORM CONVERSION 
;DONE 5 CONVERSIONS? 
;BRANCH IF NOT YET 5. 



;RESTORE REGS AND EXIT 



;SUBTRACT TEN POWER FROM BINARY VALUE 
; BRANCH IF UNSUCESSFUL SUBTRACTION 



; RESTORE SUBTRACTED VALUE. 

;CONVERT (DIGIT) TO ASCII 

;MOVE ASCII CHAR TO DECVAL FIELD 
;EXIT 



;SAVE REGS 

;GET FROM ADDRESS 

;GET TO ADDRESS 

;GET COUNT 

;MOVE BYTE 

; DECREMENT COUNT 

; BRANCH IF NOT DONE 

;RESTORE REGS AND EXIT 



UNEXPECTED POWER FAIL SERVICE 

;BECAUSE WWP MAY BE SET IN MPR ' S AND ALL PROCESSOR REGISTERS 
;MAY BE IN USE, CONTINUATION AFTER POWER FAIL IS NOT ATTEMPTED. 
;INSTEAD, THE PROGRAM RESTARTS AFTER A POWER FAILURE 



SAV04 




MOV 


(5)+,R1 


MOV 


(5)+,R2 


MOV 


(5)+,R3 


MOVB 


(1)+,(2)+ 


DEC 


R3 


BNt 


BMOVA 


RST04 




RTS 


R5 



: * i 
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SEO 0062 



3336 
3337 
3338 
3339 
3340 
3341 
3342 



015732 
015740 
015744 
015750 
015752 
015756 
015762 



012737 
012701 
03271 1 
001002 
005071 
062701 
020127 



015776 
000566 
000001 

000000 
000010 
000766 



000024 PWRDN: 



MOV 
MOV 
BIT 
BNE 
CLR 
ADD 
CMP 



#PWRUP,@#24 

#MPR0,R1 

#1 ,S»R1 

.+6 

@(R1 ) 

#10, R1 

R1 ,#TREG 



;SET UP FOR POWER UP 



;CLEAR PARITY REGISTERS IN CASE 

;WWP IS SET 



i% 
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3343 


015766 


103766 




3344 


015770 


010667 


163264 


3345 


015774 


000000 




3346 


015776 


012737 


015732 000024 


3347 


016004 


016706 


163250 


3348 


016010 


005027 


000000 


3349 


016014 


005367 


177772 


3350 


016020 


001375 




3351 


016022 


104000 




3352 


016024 


01 7344 




3353 


016026 


000167 


163244 


3354 








3355 








3356 








3357 








3358 


016032 


01 1646 




3359 


016034 


162716 


000002 


3360 


016040 


017616 


000000 


3361 


016044 


121667 


000050 


3362 


016050 


101402 




3363 


016052 


OCOOOO 




3364 


016054 


000776 




3365 


016056 


0061 16 




3366 


016060 


042716 


1 77001 


3367 


0160 64 


062716 


016076 


3368 


016070 


017616 


000000 


3369 


016074 


000136 




3370 








3371 








3372 








3373 


016076 






3374 




104000 




3375 


016076 


001 1 14 




3376 




104001 




3377 


016100 


016356 




3378 




104002 




3379 


016102 


013562 




3330 




1C4003 




3381 


0161 04 


01 3442 




3382 




104004 




3383 


0161 06 


013364 




3384 




104005 




3385 


0161 10 


016122 




3386 




1C4006 




3387 


016112 


016210 




3388 




104007 




3389 


0161 14 


016236 




3390 




10401 




3391 


016116 


016142 




3392 


016120 


000010 




3393 








3394 








3395 








3396 


0161 22 


0.2666 


177764 


3397 


016126 


012666 


177764 


3398 


016132 


012767 


000002 000040 



13- 
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BLO 


1$ 


MQV 


SP,SPSAV 


HALT 




MOV 


0PWRDN.M24 


MOV 


SPSAV,SP 


CL D 


#0 


DEC 


.-2 


BNE 


.-4 


TYPE 




MPWRF 




JMP 


RSTART 



SEO 0063 



;EMT HANDLER 



EMTINT 


MOV (SP).-(SP) 




SUB #2,(SP) 




mov e>(sp),(sp) 




CMPB (SP).EMTLIM 




BLOS EMTA 




HALT 




BR .-2 


EMTA: 


ROL (SP) 




BIC M^ 77001 , (SP) 




ADD #EMTTAB,(SP) 




MOV @(SP),(SP) 




JMP @(SP)+ 


;EMT DEFINITIONS AND ASSIGNMENTS 


EMTTAB: 






TYPE^EMT+EMTX 




STYPE 




SCOPE=EMT+EMTX 




SCOPEC 




ERROR=EMT+EMTX 




ERR 




ERRORP=EMT+EMTX 




ERRP 




ERRORS^EMT+EMTX 




ERRST 




SAV04=EMT+EMTX 




SV04 




RST04=EMT+EMTX 




RS04 




RST05S=EMT+EMTX 




RS05S 




SAV05S=EMT+EMTX 




SV05S 


EMTL1M: 


EMTX-1 



; POWER DOWN HALT 

;SET UP FOR POWER DOWN 

;STALL SO OUTPUT WON'T BE GARBLED 

;TYPE RECOVERY MESSAGE 
;RESTART 



{GET SAVED PC 

{DECREMENT PC BY 2 

;GET CALL 

{CHECK IF CALL WITHIN LIMITS 

{CALL IS NOT WITHIN LIMITS 

;EMT ARG X 2 

;REMOVE 7 MSB 

;FORM EMT RTN ADDRESS 

;GQ TO EMT RETURN 



{SUBROUTINE TO SAVE REGS 0-4 
SV04: MOV (SP)+,-12. (SP) 
MOV (SP)+,-12.(SP) 
MOV #RTI,SV05C 



{MOVE PC+PS UP STACK 
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SEQ 0064 



3399 


016140 


000411 




3400 








3401 








3402 








3403 








3404 


016142 


012767 


000240 000030 


3405 


016150 


000400 




3406 








3407 








3408 


016152 


012666 


177762 


3409 


016156 


012666 


177762 


3410 


016162 


01 0546 




341 1 


016164 


01 0446 




3412 


016166 


01 0346 




3413 


016170 


010246 




3414 


016172 


01 0146 




3415 


016174 


010046 




3416 


016176 


024646 




3417 


016200 


000002 




3418 


016202 


016605 


000020 


3419 


016206 


000002 




3420 








3421 








3422 








3423 








3424 


016210 


022626 




3425 


016212 


012600 




3426 


016214 


012601 




3427 


016216 


012602 




3428 


016220 


012603 




3429 


016222 


01 2604 




3430 


016224 


016646 


177764 


3431 


016230 


016646 


177764 


3432 


016234 


000002 




3433 








3434 








3435 








3436 








3437 


016236 


010566 


000020 


3438 


016242 


022626 




3439 


016244 


012600 




3440 


016246 


012601 




3441 


016250 


01 2602 




3442 


016252 


01 2603 




3443 


016254 


012604 




3444 


016256 


012605 




3445 


016260 


016646 


177762 


3446 


016264 


016646 


177762 


3447 


016270 


000002 




3448 








3449 








3450 








3451 








3452 








3453 








3454 









{SUBROUTINE TO SAVE REGS 0- 
SV05V MOV #NOP,SV05C 
BR SV05A 



5 + PLACE EMT PC IN R5 



{SUBROUTINE TO SAVE REGS 0-5 



MOV 


(SP)+,-l4.(SP) 




MOV 


(SP)+,-l4.(SP) 




MOV 


R5,-(SP) 




MOV 


R4,-(SP) 




MOV 


R3,-(SP) 




MOV 


R2,-(SP) 




MOV 


R1 ,-(SP) 




MOV 


%0,-(SP) 




CMP 


-(SP).-(SP) 




RTI 




{RTI OR NOP 


MOV 


16. (SP) ,R5 


;EMT PC TO R5 


RTI 







{SUBROUTINE TO RESTORE REGS 0-4 



RS04: CMP 
MOV 
MOV 
MOV 
MQV 
MOV 
MOV 
MOV 
RTI 



(SP)+,(SP) 

(SP)+,%0 
(SP)+,R1 
(SP)+,R2 
(SP)+,R3 
(SP)+,R4 
-12. (SP) 
-12. (SP) 



-(SP) 
-(SP) 



{SUBROUTINE TO RESTORE REGS 0-5 



MOV 


R5.16. (SP) 


CMP 


(SP)+,(SP)+ 


MOV 


(SP)+,%0 


MOV 


(SP)+,R1 


MOV 


(SP)+,R2 


MOV 


(SP)+,R3 


MOV 


(SP)+,R4 


MO*' 


(SP)+,R5 


MOV 


-14. (SP) ,-(SP) 


MOV 


-14.(SP),-(SP) 


RTI 





{MOVE PC+PS DOWN STACK 



{SET EMT PC TO R5 



ROUTINE TO LOOP THRU A SINGLE INSTRUCTION TEST 
LOAD THE STARTING ADDRESS OF THE TEST 
YOU WISH TO RUN (THE ADDRESS OF THE TESTXX 
TAG) AT THE 1ST HALT, SET SWITCH REGISTER 



CCMFAFO, MEMORY PARITY TEST 
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3455 
3456 
3457 
3458 
3459 
3460 
3461 
3462 
3463 
3464 
3465 
3466 
3467 
3468 
3469 
3470 
3471 
3472 
3473 
3474 
3475 
3476 
3477 
3478 
3479 
3480 
3481 
3482 
3483 
3484 
3485 
3406 
3487 
3488 
3489 
3490 
3491 
3492 
3493 
3494 
3495 
3496 
3497 
34S8 
3499 
3500 
3501 
3502 
3503 
3504 
3505 
3506 
3507 
3508 
3509 
3510 



016272 
016276 
016300 
016306 
016314 
016316 
016324 
016332 
016334 
016342 
016344 
016352 



016356 
016364 

016366 
016374 
016376 
016402 
016404 
016410 
016412 
0164 20 
016422 
016426 
016430 
016434 
016440 
016444 
016450 
016454 
016456 
016460 
016462 



016464 
016464 
016472 
016500 
016506 
016510 
016516 
016517 
016524 
016526 
016534 



005037 
000000 
017767 
062767 
000000 
012767 
032777 
001404 
042737 
000403 
052737 
000177 



032777 
001020 
032777 
001021 
005767 
001416 
005767 
001006 
026767 
100007 
005267 
022606 
01 2677 
000177 
005067 
005067 
01 1667 
000002 
000100 
000000 
000000 



005015 
020040 
020040 
020075 
020040 
000 
040 
020075 
020040 
020040 



162574 
000002 



177777 
010000 



000020 
000104 
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;OPTIONS AT THE 2ND HALT. 

;NOTE THAT SW11 MUST BE DOWN AFTER THE 2ND HALT 

TESTX: CLR ##PS 

HALT ;WAIT FOR STARTING ADDRESS 

MOV @SWR, RETURN ; LOAD STARTING ADDRESS IN RETURN 

ADD #2, RETURN ;ADD 2 TO POINT TO INSTRUCTION AFTER 

HALT ;SET SR OPTIONS 

MOV #-1 ,TSTX ;SET FLAG 

BIT #10000, @SWR ;CHECK SW12 

BEO .+12 ^BRANCH IF NOT SET 

BIC #20, MPS ;CLEAR TRACE BIT 

BR .+10 ;SKIP NEXT INSTRUCTION 

BIS #20, IMPS ;SET TRACE BIT 

JMP ^RETURN ;JUMP TO TEST 



SEO 0065 



040000 

004000 

173350 

162100 

000042 

000032 

161342 
000022 
162044 
000010 
000006 



000154 
000146 



162164 
162546 



177776 
177776 



162514 
162504 



041520 
020040 
04151 1 



;SCOPE AND/OR 

;A SETUP ROUT 

SCOPEC: BIT 

BNE 

BIT 

BNE 

TST 

BEO 

TST 

BNE 

CMP 

BPL 

INC 

SCOPES: CMP 

MOV 



SCOPEG: 



IMAX: 
ICNT: 
RETURN: 



020075 
020040 
0521 16 



JMP 
CLR 
CLR 
MOV 
RTI 
100 



ITERATION LOOP 
INE SHOULD INIT 
#40000,@SWR 
SCOPES 
#4000, @SWR 
SCOPEG 
PASCNT 
SCOPEG 
TSTX 
SCOPES 
ICNT, IMAX 
SCOPEG 
ICNT 
(6)+,%6 
(6)+,@PS 
©RETURN 
TSTX 
ICNT 
@%6, RETURN 



MTNUM: 
MPC: 



.ASCII 

.ASCII 



020040 020040 MICNT: 



046440 051120 MSTR: 



FOR EACH TEST 64 TIMES 
IALIZE RETURN AND IMAX 

TEST SR FOR SCOPE 

YES, SCOPE 

NO-TEST FOR ITERATION 

INHIBIT ITERATION 

FIRST PASS? 

YES, INHIBIT ITERATIONS 

USING SINGLE SUBTEST STARTUP? 

YES, LOOP 

COMPARE CURRENT COUNT TO MAX NUMBER 

EXIT-DONE 

INCREMENT COUNT 

REPOSITION STACK 

RESTORE PREVIOUS PROCESSOR STATUS 

REPEAT TEST 

IF USING TESTX STARTUP, RETURN TO NORMAL FLOW 

CLEAR COUNT 

SAVE SCOPE RETURN POINTER 

RETURN INLINE-NEXT TEST 

ITERATION COUNT 

COUNT LOCATION FOR ITERATION LOOP 

ADDRESS OF LAST TEST 



;ASCII MESSAGES 

MEO: 



<15><12>'PC= ' 
ICNT = 



020040 
050115 



020040 
020122 



MPR DATA= 
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3511 


016542 


040504 


040524 


020075 


3512 


016550 


020040 


020040 


020040 


3513 


016556 


020040 


000 




3514 


016561 


015 


020012 


020040 


3515 


016566 


020040 


020040 


052040 


3516 


016574 


051505 


020124 


047514 


3517 


016602 


036503 


040 




3518 


016605 


040 


020040 


020040 


3519 


016612 


040 






3520 


016613 


040 


027523 


035102 


3521 


016620 


040 






3522 


016621 


040 


020040 


020040 


3523 


016626 


040 






3524 


016627 


040 


040527 


035123 


3525 


016634 


040 






3526 


016635 


040 


020040 


020040 


3527 


016642 


020040 


000 




3528 


016645 


015 


051412 


052105 


3529 


016652 


051440 


020122 


0501 17 


3530 


016660 


044524 


0471 17 


000123 


3531 


016665 


020054 


051 120 


051505 


3532 


016674 


020123 


047503 


0521 16 


3533 


016702 


052516 


000105 




3534 


016706 


005015 


042523 


020124 


3535 


016714 


042504 


044526 


042503 


3536 


016722 


040440 


042104 


042522 


3537 


016730 


051523 


044440 


0201 16 


3538 


016736 


051 123 


000 




3539 


016741 


015 


051412 


052105 


3540 


016746 


046440 


046505 


0511 17 


3541 


0167 54 


020131 


042524 


052123 


3542 


016762 


046040 


041517 


044440 


3543 


0167 70 


0201 16 


051 123 


000 


3544 


016775 


015 


051412 


052105 


3545 


017002 


052C40 


051505 


020124 


3546 


017010 


040520 


052124 


051 105 


3547 


017016 


0201 16 


0471 1 1 


051440 


3548 


017024 


000122 






3549 


017026 


005015 


046412 


046505 


3550 


017034 


051 1 17 


020131 


040520 


3551 


017042 


044522 


054524 


051040 


3552 


017050 


043505 


05151 1 


042524 


3553 


017056 


051522 


050040 


042522 


3554. 


017064 


042523 


0521 16 


006472 


3555 


017072 


00001 2 






3556 


017074 


005015 


040520 


044522 


3557 


017102 


054524 


051040 


043505 


3558 


0171 10 


05151 1 


042524 


051522 


3559 


0171 16 


04 1440 


0471 17 


051 124 


3560 


017124 


04 61 17 


046440 


046505 


3561 


017132 


051 1 17 


020131 


051501 


3562 


017140 


006472 


000012 




3563 


017144 


020040 


020040 


000 


3564 


017151 


055 


000040 




3565 


017154 


005015 


000 




3566 


01 7157 


113 


000 





MDATA: .ASCIZ ' ' 

MSTRX: .ASCII <15><12>' TEST LO 

MSTRX1: .ASCII ' 

.ASCII ' S/B: ' 

MSTRX3: .ASCII ' ' 

.ASCII ' WAS: ' 

MSTRX5: .ASCIZ ' ' 

MSETSR: .ASCIZ <15><12>'SET SR OPTIONS' 



MCON: .ASCIZ 



PRESS CONTNUE' 



MMDEV: .ASCIZ <15><12>'SET DEVICE ADDRESS IN SR' 



MMADR: .ASCIZ <15><12>'SET MEMORY TEST LOC IN SR' 



MMPAT: .ASCIZ <15><12>'SET TEST PATTERN IN SR 1 



MMPRS: .ASCIZ <1 5X1 2X1 2> 'MEMORY PARITY REGISTERS PRESENT :' <1 5><12> 



MTMAP: .ASCIZ <1 5X1 2> ' PARI TY REGISTERS CONTROL MEMORY AS:'<15><12> 



MTYCOR: .ASCIZ ' 

MDASH: .ASCIZ '- ' 

MCR: .ASCIZ <15><12> 

MK: .ASCIZ 'K' 



iiiir 



;mfafo 


, MEMORY 


PARITY 


TEST 


MACY11 


;mfaf. 


P11 13-JAN-78 


12: 13 




3567 


017161 


116 


020117 


040520 


3568 


017166 


044522 


054524 


046440 


3569 


017174 


046505 


051 117 


020131 


3570 


017202 


047506 


047125 


006504 


3571 


017210 


000012 






3572 


017212 


047516 


050040 


051 101 


3573 


017220 


05211 1 


020131 


042522 


3574 


017226 


0S1507 


042524 


020122 


3575 


017234 


047506 


047125 


006504 


3576 


017242 


000012 






3577 


017244 


020040 


020040 


020040 


3578 


017252 


020040 


005015 


000 


3579 


017257 


177 


005015 


005015 


3580 


017264 


041503 


043115 


043101 


3581 


017272 


020060 


051515 


030461 


3582 


017300 


046454 


030501 


026461 


3583 


017306 


026120 


043115 


030461 


3584 


017314 


046055 


020120 


040520 


3585 


017322 


044522 


054524 


046440 


3586 


017330 


046505 


051117 


020131 


3587 


017336 


0^2524 


052123 


000123 


3588 


017344 


005015 


047520 


042527 


3589 


017352 


020122 


040506 


0461 1 1 


3590 


017360 


042105 


000 




3591 


017363 


007 






3592 


017364 


005015 


047105 


020104 


3593 


017372 


040520 


051523 


036440 


3594 


017400 


040 






3595 


01 7401 


040 


020040 


020040 


3596 


017406 


000040 






3597 


017410 


006415 


041012 


042101 


3598 


017416 


050040 


051 101 


043040 


3599 


017424 


052517 


0421 16 


044440 


3600 


017432 


020116 


047514 


020103 


3601 


017440 


020040 


020040 


020040 


3602 


017446 


000 






3603 


017447 


015 


051012 


043505 


3604 


017454 


05151 1 


042524 


020122 


3605 


017462 


052101 


000040 




3606 


017466 


005015 


047515 


044516 


3607 


017474 


047524 


020122 


044527 


3608 


017502 


0461 14 


047040 


0521 17 


3609 


017510 


041040 


020105 


042522 


3610 


017516 


052123 


051117 


042105 


361 1 


017524 


043040 


051 1 17 


040440 


3612 


017532 


0201 16 


045470 


051440 


3613 


017540 


051531 


042524 


0001 15 


3614 


017546 


047503 


052116 


047522 


3615 


017554 


C51514 


000040 




3616 


01 7560 


005015 


047514 


042101 


3617 


017566 


051 105 


020123 


042522 


3618 


017574 


052123 


051 1 17 


042105 


3619 


017602 


000 






3620 


01 7603 


015 


041012 


042101 


3621 


017610 


050040 


051 101 


0521 11 


3622 


017616 


020131 


041523 


047101 



30A{1052) 13-JAN-78 12:27 PAGE 67 
MT: .ASCIZ 'NO PARITY MEMORY FOUND ' <1 5X1 2> 



MTR: .ASCIZ 'NO PARITY REGSTER FOUND ' <1 5X1 2> 



SEQ 0067 



MPRAD: .ASCIZ ' '<15><12> 

MTIT: .ASCIZ <177X15X12X15X12>'CCMFAF0 MS1 1 ,MA1 1-P ,MF1 1-LP PARITY MEMORY TESTS' 



MPWRF: .ASCIZ <15><12>'P0WER FAILED' 



MPGEND: .BYTE 007 

.ASCII <15><12>'END PASS 



MPCNT: .ASCIZ ' ' 

MPSER: .ASCII <15X15X12>'BAD PAR FOUND IN LOC 



MPSER1: .ASCIZ ' ' 

MX1: .ASCIZ <15><12>'REGISTER AT 



NOMON: .ASCIZ <15><12>'M0NIT0R WILL NOT BE RESTORED FOR AN 8K SYSTEM' 



MX2". .ASCIZ 'CONTROLS ' 

LDRMSG: .ASCIZ <1 5><1 2> ' LOADERS RESTORED' 



PSMSG: .ASCIZ <15><12>'BAD PARITY SCAN COMPLETE 1 



CCMFAFO, MEMORY PARITY TEST MACY11 30A(10&2) 13-JAN-78 12:27 PAGE 68 

CCMFAF.P11 13-JAN-78 12:13 



SEQ 0068 





3623 


017624 


041440 


046517 


046120 






3624 


017632 


052105 


000105 








3625 


017636 


005015 


047514 


042101 


MLDRSV: 




3626 


017644 


051 105 


020123 


040523 






3627 


017652 


042526 


020104 


0471 1 1 






3623 


01 7660 


041040 


047101 


0201 13 






3629 


017666 


000061 










3630 


017670 


020040 


020040 


020040 


MPRCOR: 




3631 


017676 


020040 


020055 


047503 




Jllllll, 


3632 


01 7704 


042522 


050040 


051 101 






3633 

3634 


017712 
017720 


0521 1 1 
044507 


020131 
052123 


042522 
051 105 








"'^Ilp^' 


3635 


017726 


005015 


000 








3636 


017731 


040 


020040 


020040 


MPRMOS: 




3637 


017736 


020040 


026440 


046440 






3638 


017744 


051517 


050040 


051 101 






3639 


017752 


0521 1 1 


020131 


042522 






3640 


017760 


044507 


052123 


051105 






3641 


017766 


005015 


000 








3642 




017772 










3643 




000001 









<1 5X1 2>' LOADERS SAVED IN BANK 1' 



CORE PARITY REGISTER ' <15><1 2> 



MOS PARITY REGISTER'<15><12> 



• EVEN 
.END 
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SEQ 0069 



ADRPT 000516 



ADRS = 


077400 


ADRTYP 


001230 


ADTENP 


015670 


AE 


000001 


BDCNV 


015524 


BDCNVA 


015556 


BDCNVB 


015610 


BDCNVC 


015612 


BDCNVD 


015614 


BEGIN 


002106 


BITPT 


000520 



BITO = 


000001 


BIT1 = 


000002 


BIT 1 = 


002000 


B I T 1 1 = 


004000 


BIT12 = 


010000 


BIT13 = 


020000 


B1T14 = 


040000 


BIT 15 = 


1 00000 


BIT2 = 


000004 


BIT3 = 


000010 


BIT4 = 


0C0020 


BIT5 = 


000040 


BIT6 = 


0001 00 


B1T7 = 


000200 


BIT8 = 


000400 


BIT9 = 


001000 


BMOVA 


015720 


BMOVE 


015710 


CACHE 


001224 


CACHFL 


001222 


CKBKO 


010600 


CLRPAR 


014012 


CNT16 


007314 


CNT17 


C10206 


CNVCTR 


015662 


CN16 


007334 


CONT 


011712 


C0NT10 


004274 


C0NT12 


005024 


C0NT13 


005304 


CONT 3 


002616 


C0NT4 


003074 


COUNT 


004336 


DDISP = 


177570 


DECVAL 


015702 


DIGIT 


015664 


DISPLA 


001 1 02 



425# 
1932 
3640 
6600 
3283 

3620 
2163 
2782 
32850 
3290* 
3281* 
3282* 
692 
4260 
1901* 

2606* 

2728* 
3460 
3470 
3560 
3570 
3580 
3590 
3600 
361* 
3480 
349* 
3500 
3510 
3520 
3530 
3540 
355.* 

3324* 

3291 
6580 
657# 

2320 
966 

1918 

3191 

20520 

2157 

3284* 

1980 

2561 

1344 

1510 

1609 
9710 

10520 

1337* 
3670 

3279 

3297* 
6160 



1671* 
2763* 

2655* 
3309* 
1040 
2315 
2797 
3288 
32920 
32930 
3289 
806 
822* 
1905 
2608* 
2730* 



2901 
402 



1356 
1441 

2567 
983 

3326 

33200 
818* 
737* 

23310 
999 

1925 



22390 

3287* 

20630 

25670 

1350 

15520 

16440 

987 
1062 
1351* 

616 
33140 
3300* 

732* 



1673* 
2777 

2668 

1283 

32780 



32940 
8150 
1668 
1907 
2615 
2738 



910* 
816 



1090 
2087 



1071 
13910 



3303* 
832* 



1680* 
2822* 



2696 
1?35 



2701* 
1498 



2575 

1670* 1674 

1912* 1913 

2626* 2633* 

2764* 2777 



2702 
1599 



1676 
2002 
2634 
2808* 



2711* 
1696 



1681* 
2089* 
2638 
2823* 



2741* 
1812 



1682 
2098 
2649* 
2831* 



1789* 
2101* 
2690 



1790 

2107* 

2692 



1793* 

2179 

2707 



1799* 1899 
2262* 2597* 
2710* 2712 



1144 1273 
2275 2304 



1308 


1402 


1468 


1571 


1663 


1705 


1781 


1821 


2324 


2416 


2519 


2549 


2750 


29540 


3106 


3147 



3304 33070 
884* 963* 397* 1089* 1143* 1272* 1307* 1401* 1467* 1570* 
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DISPRE 


0001 74 


DONE 


01 1624 


D0NE10 


004322 


D0NE1 1 


004542 


D0NE12 


005040 


D0NE13 


005320 


D0NE14 


005616 


D0NE15 


006262 


DONE 16 


0C6650 


DONE 17 


007576 


D0NE20 


010564 


D0NE4 


003140 


DCNE5 


003322 


D0NE6 


003662 


D0NE7 


003774 


DSWR = 


177570 


EMTA 


016056 


EMTINT 


016032 


EMTLIM 


016120 


EMTTAB 


016076 


EMTX = 


00001 1 


ERR 


013562 


ERRA 


01 3604 


ERRA1 


013632 


ERRA2 


013634 


ERRA3 


013644 


ERRA4 


013646 


ERRA5 


013656 


ERRB 


013660 


ERRBX 


013662 


ERRC 


013666 


ERRD 


013710 


ERROR = 


104002 



ERRORP= 


1 04003 


ERRORS* 


1 04004 


ERRP 


013442 


ERRST 


013364 


EX 


005460 


FT1TLE 


000512 


GMPRA 


001664 


GMPRB 


002012 


GMPRC 


002020 


GMPRD 


002054 


HI ADR 


000530 


H1W0RD 


000552 


1CNT 


016460 


I MAX 


016456 


INDCO 


000770 


INDC1 


000772 


INDC10 


001014 


INDC1 1 


001016 



1661* 


1777* 


1897* 


2082* 


2083* 


2303* 


2415* 














4060 


732 
























2266 


2270 


2273 


2540 


25470 


















1323 


13870 
























1419 


14550 
























1485 


15570 
























1584 


16490 
























1685 


17070 
























1796 


18230 
























1915 


19250 
























2104 


21 160 
























23240 


2362 
























1013 


10790 
























1 103 


11310 
























1 156 


12620 
























1282 


12880 
























3660 


615 
























3362 


33650 
























397 


33580 
























3361 


33920 
























3367 


33730 
























33730 


3374 


33760 


33780 


33800 ' 


33820 


33840 


33860 


33880 


33900 


33920 






2336 


2357 


2375 


2389 


2396 


2461 


2468 


2482 


2499 


2509 


28980 


3379 




2856 


2892 


29010 






















2284* 


2531* 


29060 






















2285* 


2532* 


29070 






















2286* 


2533* 


29100 






















2287* 


2534* 


291 10 






















2288* 


2535* 


29140 






















2844* 


2866* 


2898* 


29150 




















2845* 


2846* 


2868* 


2869* 


2899* 


2900* 


29160 














2902 


29180 
























2903* 


2904* 


2906 


29240 




















850 


864 


922 


932 


1027 


1046 


1056 


1063 


1074 


1111 


1125 


1165 


1181 


1 195 


1213 


1230 


1240 


1258 


1290 


1:*27 


1341 


1347 


1359 


1375 


1424 


1438 


1445 


1491 


1503 


1514 


1522 


1537 


1545 


1591 


1603 


1613 


1622 


1638 


1718 


1755 


1836 


1871 


1972 


1999 


2005 


2029 


2057 


2149 


2176 


2183 


2199 


2208 


2244 


2816 


3144 


3236 


33780 


















2020 


2046 


33800 






















1736 


1759 


1855 


1875 


2232 


33820 
















28660 


3381 
























28440 


3383 
























1677 


16790 
























4230 


700 


743 


745* 




















7660 


798 
























764 


7930 
























792 


7950 
























802 


8050 
























4300 


1687* 


1688* 


1691 


1722 


1916* 


1917* 


1921 


2066 










4400 


2653* 


2688 


2705 


2732* 


2757* 


2810 


2824* 












2910 


3482 


3484* 


3489* 


34930 


















820* 


885* 


998* 


1662* 


3482 


34920 
















5560 


763 


834 


887 


907 


1007 


1316 


1409 


1475 


1991 


2168 


2445 




5570 


























5660 


























5670 
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568* 

569* 

570* 

571* 

558* 

559* 

560* 

561* 

562* 

563* 

564* 

5650 

2097* 2108* 2181* 

1339* 1364 

1345* 1367 

668* 2979* 

669* 1785* 1792* 2094* 2100* 2229 2600* 2740* 3015* 3164 3171* 3180* 3188* 
3208 

670* 

671* 2978* 

664* 2975* 

665* 2976* 

666* 

667* 2977* 

659* 2650* 2718 2726* 

3082 3616* 

3052* 3059* 3065 

1014 1104 1158 1324 1420 1487 1586 2991* 

3000 3006 3013* 

811 2560* 

1319* 1331 1386 

1411 1415* 1427 1454 

1477 1481* 1494 1555 

1581* 1595 1647 

1672 1674* 1683 

1790* 1794 1800 

2454* 2477 

1008* 1012 

1098* 1102 

1 151* 1 155 

1279* 1287 1297 

1792* 1822 

1010* 1031 1055 

1 100* 1115 1130 

1153* 1169 1261 

441* 1786* 179 c 1797* 2095* 2103 2105* 

3025* 3026 302»* 

1317* 1322 

1410* 1418 

1476* 1484 

1578* 1583 

1676* 1706 

1900 1904* 

1277* 1281 
2589* 

2585 2621* 



INDC12 


001020 


INDC13 


001022 


INDC14 


001024 


INDC15 


001026 


INDC2 


000774 


1NDC3 


000776 


INDC4 


001000 


INDC5 


001002 


1NDC6 


001004 


1NDC7 


001006 


INDC8 


001010 


IN DC 9 


001012 


INDX17= 


010060 


INST1 


004164 


INST2 


0041 72 


KPARO 


001250 


KPAR1 


001252 


KPAR2 


001254 


KPAR7 


001256 


KPDRO 


001 240 


KPDR1 


001242 


KPDR2 


001244 


KPDR7 


001246 


KTSTAR 


001226 


LDRMSG 


01 7560 


LDRSVD 


014416 


LOCATM 


014126 


L0CAT1 


014224 


LOGICA 


01 1672 


LOOP10 


004066 


L00P1 1 


004416 


L00P12 


004632 


L00P13 


005124 


L00P14 


005436 


L00P15 


006106 


L00P21 


01 1260 


L00P4 


002762 


LOOPS 


003216 


L00P6 


003372 


L00P7 


003734 


LOP 15 


006! 16 


L0P4 


002770 


L0P5 


003224 


L0P6 


003400 


LOWFLG 


000554 


LSAV 


014300 


LUP10 


004060 


LUP1 1 


004402 


LUP12 


004616 


LUP13 


0051 16 


LUP14 


005446 


LUP16 


006526 


LUP7 


003726 


MAPMA 


01 1770 


MAPMB 


012162 
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MAPMEM 


01 1756 


MAPRB 


012346 


MAPRC 


012446 


MAPRD 


012546 


MAPRE 


012642 


MAPREG 


012304 


MAPI 


014062 


MCON 


016666 


FvlCR 


017154 


MDASH 


017151 


MDATA 


016550 


MEMH 


001066 


MEML 


001064 


MEMUT 


000546 


MEO 


016464 


MICNT 


016510 


MK 


017157 


MLDRSV 


017636 


MMADR 


016741 


MMDEV 


016706 


MMPAT 


016775 


MMPRS 


017026 


MONCNT 


01 1754 


MPC 


016472 


MPCNT 


017401 


MPGEND 


017363 


MPRAD 


017244 


MPRCOR 


017670 


MPRMOS 


017731 


MPROK 


000542 


MPRO 


000566 



2975# 3168 



MPR1 


000576 


MPR10 


000706 


MPR11 


000716 


MPR12 


000726 


MPR13 


000736 


MPR14 


000746 


MPR15 


000756 


MPR2 


000606 


MPR3 


000616 


MPR4 


000626 


MPR5 


000636 


MPR6 


000646 


MPR7 


000656 


MPR8 


000666 


MPR9 


000676 


MPSER 


017410 


MPSER1 


017440 


MPWRF 


017344 


MSETSR 


016645 


MSTR 


016517 


MSTRX 


016561 


MSTRX1 


016605 



707 967 2585* 

2660* 2704 2714 2742 
2679* 

2682 2700* 

2706 2708 2715* 

968 2648* 

1003 1094 1148 1312 1406 1472 1575 1783 2091 2591 27 

2806 3565* 
2791 3564* 
2854 2878 3512* 

597* 2596* 2609 2625* 2731 3178 

596* 2271 2595* 2598 2624* 2638* 2648 3124 3175 

438* 2598* 2609* 2615* 2648* 2712 2731* 2738 
2914 3500* 
2911 3505* 
2804 3566* 

751 3625* 
3539* 
3534* 
3544* 

760 3549* 
2577* 

2907 3502* 
2553 3595* 
2556 3591* 
2770 2775 3577* 

777 780 3630* 

786 789 3636* 

436* 761* 791* 805 

478 * 762 833 886 906 973 1006 1097 1150 1276 1315 1408 1474 
WaI i?2« 1? f 1?4? 18 ° 8 1845 1863 1936 1948 1964 1 983 990 2125 

2957 l\tl l\tl 3337 " 4? ^ ^ "" 24 " 266 ° 26?1 2 ™ 2753 

482* 

518* 

522* 

526* 

530* 

534* 

538* 

486* 

490* 

494* 

498* 

502* 

506* 

510* 

514* 
3134 3227 3597* 

3131 3221 3223 3225* 3601* 
3352 3588* 
3528* 

2844 2866 3507* 
2868 3514* 
2882 3518* 
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MSTRX3 


016621 


MSTRX5 


016635 


MT 


017161 


MTIT 


017257 


MTMAP 


017074 


MTNUM 


016464 


MTR 


01 721 2 


MTREG 


016526 


MTYCOR 


017144 


MTYFG 


000562 


MX1 • 


017447 


MX2 


017546 


NOKT 


000550 


NOMON 


017466 


NOP 


000240 


NOREG 


002062 


NRALL 


013712 


OACDST 


015520 


OACNT 


015522 


OACNV 


015416 


OACNVA 


015440 


OACNVX 


015516 


ODDFLG 


000556 


OPEN = 


000000 


OUT 


010330 


PARPAT 


001C36 


PARVEC= 


0001 14 


PASCNT 


01 1 752 


PDREND 


001236 


PDRTAB 


001232 


PERR = 


100000 


PMEMH 


001072 


PMEML 


001070 


PMEMX 


001074 


PS 


177776 


PSADRS 


015020 


PSCAN 


014514 


PSCANH 


015022 


PSCANX 


014762 


PSCAN1 


015024 


PSCX1 


015136 


PSLOOP 


015060 


PSLUP 


015064 


PSMSG 


01 7603 


PSNXT 


0151 10 


PSXTST 


015144 


PWRDN 


015732 


PWRUP 


015776 


RELOC 


000564 


RESRVD 


001030 


RESVC 


001032 



2886 


3522* 






















2890 


35260 






















35670 
























749 


35790 






















2752 


35560 






















35010 
























808 


35720 






















2850 


2874 


35090 




















2784 


2789 


2799 


2802 


35630 
















4450 


684* 


722* 


964 


982* 
















2773 


36030 






















2787 


361 40 






















4390 


71 1 


1000 


1080 


1091 


1 131 


1145 


1262 


1309 


1387 


1403 


1455 


1558 


1572 


165G 


1778 


2084 


2589* 


2621* 


2715 


2994 


3013 


3102 




2834 


36060 






















3710 


3404 






















8070 
























1002 


1093 


1147 


1311 


1405 


1471 


1574 


1782 


2090 


2590 


2722 


2929i 


3256* 


3258* 


3262* 


3263* 


32720 
















3257* 


3258 


3268* 


32730 


















775 


784 


2551 


2768 


2848 


2852 


2872 


2876 


2880 


2884 


2888 


2905 


3129 


3219 


32550 




















32590 


3269 






















3255* 


3259 


3264* 


3265* 


3266* 


3267* 


32710 












4420 


1933* 


1945 


1955 


2063* 


2122* 


2133 


2250* 


2426* 


2437 


2514* 




372# 


2915 


2916 


2924 


3249 


3271 


3292 


3293 


3294 


3306 


3307 


3308 


1910 


22740 






















5820 


1686 


1801 


2305 


















3810 


1039* 


1042* 


1079* 


1274* 


1275* 


1288* 


1336* 


1366* 


1381* 


1495* 


1531" 


1596* 


1632* 


1649* 


1664* 


1707* 


1788* 


1824* 


1898* 


1926* 


2088* 


2117* 


2310- 


2547* 
























685* 


723* 


2550* 


2552 


25760 


3478 














6630 


2942 






















661 # 


2936 






















3650 


1284 






















6020 


972* 


977* 


1798 


2106 
















6000 


971* 


976* 


1665 


1674 


1787 


1905 


2096 


2268 








604* 


1787* 


1790 


1798* 


2096* 


2098 


2106* 












3680 


689* 


2274* 


2301 


2335 


2356 


2374 


2383 


2395 


2413 


2460 


2467 


2498 


2508 


2520 


3247 


3457* 


3465* 


3467* 


3486* 










3128* 


3130 


31570 


3205* 


3206* 


3218* 


3220 












708 


1740 


1764 


1879 


30900 
















31580 


3170* 


3173 


3183 


3185* 
















3123 


31470 


3189 




















3103 


31640 






















3184 


31880 






















31720 


3187 






















31730 


3182 






















710 


36200 






















3177 


31800 


3204 




















3176 


3179 


31900 




















686 


724 


33360 


3346 


















3336 


33460 






















4470 


2651* 


2721* 


2733* 


2734 


2740 














5720 


841* 


843* 


848 


854 


860 














5750 


841 























CCMFAFO, MEMORY PARITY TEST 
CCMFAF.P11 13-JAN-78 12:13 



5760 

815* 
414 
410 
3066 
3295 
33880 
3387 
3389 
6730 
6740 
6750 
6760 
6770 
6780 
819 
3047 

3278 

33900 
412 
7060 
703 
6550 
831 

1896 

3475 

2302 

3477 
4330 

1667 
6720 
3820 

2727* 
408 
705 
3730 

3286 

32980 

3299 

3385 

3405 

3399 

3398* 

3391 
6150 

3459 
4070 
4370 
4440 
4240 

3285* 

34570 
815 

1289 

1390 

14660 
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RESVM 


001034 


RETURN 


016462 


RSTART 


001276 


RSTLDR 


014420 


RSTLDX 


01451 


RST04 = 


= 104006 


RST05S= 


: 104007 


RS04 


016210 


RS05S 


016236 


ROSAV 


001262 


RISAV 


001264 


R2SAV 


001 266 


R3SAV 


001270 


R4SAV 


001272 


R5SAV 


001274 


SAVLDR 


014302 


SAVLDX 


014400 


SAV04 = 


104005 


SAV05S= 


104010 


SCAN 


001356 


SCANA 


001400 


SCANB 


001404 


SCNFLG 


001220 


SCOPE = 


104001 


SCOPEB 


016426 


SCOPEC 


016356 


SCOPEG 


016440 


SHDBE 


000534 


SMLSYS 


013344 


SPSAV 


001260 


SRO 


177572 


START 


001436 


START1 


001632 


STKPT = 


000510 


SUBTEN 


015622 


SUBTNA 


015626 


SUBTNB 


015642 


SV04 


016122 


SV05A 


016152 


SV05B 


016164 


SV05C 


016200 


SV05S 


016142 


SWR 


001 100 


SWREG 


000176 


TBANK 


000544 


TEMP 


000560 


TEMPX 


000514 


TENPWR 


015666 


TESTX 


016272 


TEST1 


002154 


TEST10 


004016 


TEST11 


004340 


TEST12 


004554 



843 
2283* 

6830 
2081 
3076 
3327 

34240 
34370 



30340 
30540 
3320 

6990 
803 
70 70 
704* 
883 
2080 
3481 
2414 
3479 
1934* 
28310 
3344* 
713* 
2736* 
7210 
744 
683 
32970 
3301 
33020 
33960 
34080 
341 10 
3404* 
34040 

729 

3463 

731 

2594* 

774* 
3298 

831# 
13060 
1400# 



929 
3459* 
3353 
30650 
30830 
33860 



33840 
715 



706* 

962 
2258 
34850 
2521 
3483 
2123* 

3347 
1082* 
2980* 
813 
747 
699 



776 

3302 



996 1088 
33760 

3377 34740 

34880 

2427* 2685 



1133* 
3165 



7590 
721 



731* 983 
347; 3476 



783* 
33080 



2610 
785 



2652* 
2767* 



2667 
2769 
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15690 

16600 

170B 

1679 

1927 

8830 
2283 
2326 
9620 
965 
10880 
1 1420 
1271 # 

981 
27540 
27760 

2778 

2780 

2756 

8240 
1272 
17780 
6180 
1700 

1817 
6170 
4350 
5430 

1417 

1854* 

2037 

2242 

2489 

3199 
4270 

1336 

1366 

1495 

1596 

1664 

1788 

1898 

19840 

2088 

21610 

2310 

1032 

1039 

1042 

1274 
4310 
373 

1318 

1413 

1479 

1579 



TEST13 


005060 


TEST14 


005340 


TEST15 


006014 


TEST16 


006462 


TEST 17 


007360 


TEST2 


002326 


TEST20 


010452 


TEST21 


01 1054 


TEST3 


002564 


TEST4 


002712 


TEST5 


003160 


TEST6 


003334 


TEST7 


003674 


TMAP 


013020 


TMAPA 


013034 


TMAPB 


013140 


TMAPC 


013226 


TMAPD 


013272 


TMAPEX 


013342 


TNUM = 


000022 


TPB 


001106 


TPCORE 


005626 


TPCORX 


006276 


TPS 


001 104 


TRDATA 


000540 


TREG 


000766 



TRFLG 


000522 


TRP10 


004202 


TRP10A 


004252 


TRP12 


004724 


TRP13 


005214 


TRP14 


005734 


TRP15 


006402 


TRP16 


007076 


TRP16A 


007102 


TRP17 


007762 


TRP17A 


007766 


TRP20 


010720 


TRP4A 


0031 10 


TRP4B 


0031 16 


TRP4C 


003124 


TRP7 


004004 


TSTLOC 


000532 


TSTX 


000510 


TST10 


004104 


TST11 


004434 


TST12 


004650 


TST13 


005140 
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2263 

17760 

1780 1825 

20800 



2293 
24130 



27500 

2766 

2809 

27940 

2793 

28260 

832 
12730 
1897 

647* 
17120 
18290 

645 
2847* 

797 
1483 
1862* 
2053* 
2317 
2504* 
3342 
2758* 
13510 
13690 
151 10 
16100 
17460 
18620 
19830 
1989 
21600 
2166 
23650 
10560 
10630 
10720 
12900 
2870* 

4220 
13240 
14200 
14870 
15860 



23010 



2815 
2825 

2795 

8330 
1307 
18980 
2574* 



90 ' 
2853 

847* 
1582 
1869 
2055 
2346* 
2506 

2779 



884 
13080 
2083 



2572 
2871* 
848* 
1698 
1874* 
2131 
2353 
2665 

2781* 



8850 963 
1401 14020 
20840 2303 



9640 


997 


9980 


1089 


10900 


1143 


11440 


1467 


14680 


1570 


15710 


1661 


1662# 


1777 


23040 


2415 


24160 











2877 
874 
1724* 
1943 
2147 
2365* 
2677 

2794 



876* 
173k 
1953 
2165 
2372 
2681 

2796* 



898 
1735* 
1970 
2169* 
2435 
2755 



941 
1746* 
1988 
2174 
2450 
2847 



979 
1753 
1992* 
2189* 
2453* 
2849 



1101 

1758* 

1997 

2193 

2458 

2871 



1154 

1815 

2011* 

2206 

2473* 

2873 



1280 

1843* 

2014 

2222 

2476 

2959 



1321 

1851 

2027 

2240* 

2479 

3116 



2881 
688* 
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1675 
1791 
1009 
1099 
1152 
1278 
4290 
4280 
709 
2790 
3245 
3243* 
2913 
4340 
3630 
1951 
1923 
19350 
21 14 
21240 
24250 
24280 
2086 
25240 
400 
6200 
6190 
6210 
6240 
3940 
842 
1132 
1388 
1621 
1865 
2064 
2269 
2568 
3143 



TST14 


005510 


TST15 


006162 


TST4 


003002 


TST5 


003240 


TST6 


003414 


TST7 


003750 


TYCOR 


000526 


TYFLG 


000524 


TYPE = 


104000 


TYPSAX 


015402 


TYPSBX 


015412 


TYPSX 


015364 


WAS 


000536 


WWP 


000004 


WWP16 


006666 


WWP16A 


006704 


WWP1 7 


007614 


WWP17A 


007632 


.WWP21 


011110 


"WWP21 A 


01 1 124 


XFR1 


010252 


XFR2 


01 1520 


SENDAD 


011702 


SFILLS 


001 1 1 1 


$NULL 


001 1 10 


STPFLG 


001112 


$TYPE 


001 1 14 


= 


017772 
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16860 
18010 
10140 
1 1040 
11580 
12830 
2762* 
2760* 

748 
2801 
32470 
3244 
32430 
1715* 
1033 
1968 
19320 
2069 
21210 
2257 



SEQ 0076 



2518 
21 18 

25630 

639 

624 

3248 

3960 

849 

1 164 

1423 

1637 

1903 

2085 

2272 

2573 

3195 



2776* 
2792* 

750 
2803 

32490 

3250 

1716 

1116 

1986 



2783 
2807* 

759 
2805 



1833* 

1120 

2128 



2798 

2812 

779 

2833 



1834 
1206 
2145 



78L' 
3081 



901 
3375 
3990 
863 
1194 
1437 
1651 
1908 
2127 
2314 
2662 
3229 



4010 
893 
1212 
1444 
1666 
1909 
2144 
2334 
2673 
3235 



4050 
904 
1221 
1456 
1678 
1938 
2162 
2341 
2716 
3339 



4090 

921 
1229 
1490 
1695 
1950 
2175 
2349 
2919 
3349* 



807 
3133 



2555 
3226 



2751 
3351 



2772 
33740 



2017* 2196* 
1233 1332 
2163 2433 



2889 






1430 


:496 


1527 


2448 


2663 


2674 



41 10 

931 
1239 
1513 
1717 
1L'S7 
2181 
2368 
2921 
3350 



4130 4160 



984 
1249 
1521 
1728 
1985 
2182 
2432 
2957 
3364 



1026 
1257 
1536 
1749 
1998 
2198 
2447 
2959 
3464 



6140 
1073 
1263 
1544 
1779 
2004 
2231 
2459 
2961 
3466 



712 
1081 
1326 
1559 
1811 
2019 
2243 
2466 
3084 
36420 



810 
1110 
1358 
1590 
1835 
2045 
2251 
2507 
3112 



817 
1124 
1373 
1612 
1847 
2056 
2265 
2515 
3136 
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EMTDEF 
TESTX 



388# 
390# 
2083 



3373 

832 

2303 



3376 

884 

2415 
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3378 
963 



3380 
997 



3382 
1089 



3384 
1143 



3386 
1272 



3388 
1307 



3390 
1401 



SEO 0077 
1777 1897 



ERRORS DETECTED: 

CCMFAF.CCMFAF. LST/CRF/S0L=CCMFAF.P1 1 
RUN-TIME: A 9 1 SECONDS 
RUN-TIME' RATIO: 247/15=16.3 
CORE USED: 9K ( 17 PAGES) 



# 
4 



